special expanded DISKLOCKS= how to copy-protect disks 
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about the cover... 
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ty njuji 



According Co the artist, Higher and Higher refers not only t*» til* rising space shuttle 
but to the hopes of a graphics resolution even higher thai: Hi-Res, Here Ryufi shows 
Columbia rising on her second voyage, Just as HardCore publishes its second issue. From 
Low-Resolution to High-resolution to.. .reality. ..Higher and higher... 
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... programs 

Utility DiskEdit 2.1 (A-soft ) a disk editing tool used to "free" locked programs 

Utility DiskView 1.0 (A-soft ) a disk viewing tool used to examine copy-protected disks 

Art Artist's Easel (A-scft } a screen drawing tool to create graphics in hi-res 

Game Amber's T's (A-soft) Elementary winner-determining lo-res Tic Tac Toe 

Game Text Invaders 2.0 (A-soft) Invader-type game played on the Text page 

Game Relief Mapper 1.0 (A-soft) Module to create 3-D Mountainous Islands 
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note to writers 



Manuscripts should be printed on white bond and must be 
double spaced. Your submission of a manuscript (eg. article, pro- 
gram or listing) means that you attest that the manuscript is 
original, that you hold all the rights to it, and that you intend to sell 
us all rights to articles, and first publication plus first reprint rights 
to program listings (which means that disk and cassette copies of 
the program are available from our Program Library unless other- 
wise stated). 



self-marketing offer 



If you decide to self-market your program, the HARD- 
CORE Program Library (as a service to our readers) will be allowed 
to sell your program until 1 month after the next issue of HARD- 
CORE is published. And as a service to self -marketers, we also will 
run a mini-ad ( 1 " high by 2" wide) for you and your program in the 
next 3 issues of Hardcore . . . free of charge!) 



keep a copy 



We cannot be responsible lor lost material nor can we return 
manuscripts, disks or tapes unless accompanied by a self-address 
sufficiently stamped envelope. (You should always keep a copy of 

anything you submit.) 

product review policy 



All samples, complimentary copies and other merchandise 
sent in for review become part of the Hardcore Review Inventory- 
Library and will not be returned. 

If you have a product you think is good enough to be review- 
ed by Hardcore then we encourage you to send a copy to either 
Hardware Reviews (includes firm and coarseware) or Software 
Reviews (includes books and magazines). Please include full 
documentation/Instructions that your customers would receive 
after purchasing your product. 

Hardcore sometimes reviews products not received for 
review. We also encourage advertisers to send samples of pro- 
ducts advertised in Hardcore. Although we do not endorse the pro- 
ducts advertised in Hardcore, we do sometimes alert the readers to 
particularly bad or good buys. Receipt of a sample does not en- 
sure a positive review, nor does the non-receipt lead to a negative 
review. We will, however, note whether a sample was supplied for 



review. 



opinions and claims 



Disclaimer 
AH opinions stated in reviews, editorials, and articles are the 
products of their authors- Hardcore encourages its writers to be 
honest, open, and accurate. All claims made by advertisers are 
their own. if, however, you feel you have been wronged by one of 
our advertisers, or by any computer-oriented produtt vendor 
please make your concerns known to us. Drop a letter to CRAB- 
APPLES (the voice of the consumers). 
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Hara it is, finally: HARDCORE 2 with almost twice the 

! of tha Pramiar laauol 
tn HCti B wa walcome as vara I raw writara and columnists 
to the pagas of HARDCORE: 

Jack Hewitt begins his coiimn on Hi-Res graphics With a program 
oaled the Easel 9.0. 

Barry D. Bayer introduces his forum for software consumers, a 
column in which purchasers and vendors meet to resofve their 
conffcts. 

Joe Zuis expresses his concerns about, and describes some 
possible solutions to, the BO-cBlled "piracy" problem. 

And Art Cohl raps the "original pirates" for "crying all the way to 
the bank" about profits lost to pirates. 

Besides the columns described above, we have a few others that 
we're introducing: "Apple Softie", end "My First 'Real' Program": 

The "Softie" is a program feted in Update 1.1. It's called Text 
Invaders and for those who doubt that an action graphics game cen be 
played on the text page, have you got a surprise in store for you. 

"My Rrst 'Real' Program", in this case, is the editor's own. in this 
simple low-res tic-tac-toe game, Bev Haight treats the readers to its 
"search" routine for determining the winner and its interesting colorful 
graphics. The author shares his opinions on how it can be improved as 
well as how he'd write such a program now-a-days. 

Ha urges you to submit your own ideas and programs for publication 
under these two new multi-writer columns. 

Of course, Bobby's DiskLocka baa baan updatad to includa 
3.2 cystoma (with now tables and charts) to help you under- 
stand cony-protection and to show you how to do it yourself. 

Mike Rynn is sti tromping through adventure after adventure. He 
introduces the Aemon series. 

Continuing his semi-column on writing the ultimate modular 
customizable adventure, B. Bryte introduces the Maze-Maker 
modules. 

And for those who now have Chuck Height's Disk Edit 1.0, we 
include the updated and revised DiskEdit 2.1 . Because so much was 
changed to me ke it run faster [even with the additional commends], we 
have printed the entire listing in Its own article. 

Meanwhile, Chuck's column on DOS, CHRST4), presents s 
new utility program: DiskView, a nibblarl 

In our new Rebuttal section, Val GokJing responds to points raised in 
the interview with Dave Alpert. 

We have reviews of another Bit-copy program: Nibbles Away 

And. finally, we have lots of letters we want to share with you... 
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Dear Sirs, 

I have notified ay post office that I 
find the enclosed Material pornographic and 
extremely offensive. Please refrain from 
ever polluting the American postal system 
with your distasteful magazine (?) again. 

Thank you, 

ON-LINE Systems 



Dearest friends. 

It's about time! A forum for questions 
(and answers) that other journals won't even 
talk about. For example, why has Apple Com- 
puter not updated their FORTRAN Compiler 
rather than providing the inconvenient FORT- 
FIX program? Because the compiler is copy 
■protected' and the portion of the compiler 
that needs fixing is on the protected (ie. 
offset) track five. A true repair to the 
compiler would require giving everyone a new 
pair of disks ("too expensive!' 1 ) or reveal- 
ing the protection scheme in a program to 
fix the bad segment ("no way, Jack!")- A" 
expensive software tool is rendered next to 
useless because of greed. 

I have no patience with software that can 
not be backed-up, repaired, customized, or 
used to learn. I am tired of magazines that 
are thinly disguised software catalogs. I 
am angry that information is suppressed for 
profit's sake. Nhat if scientists tried to 
conceal the methods used in their research? 
Where would we be if Sir Alexander Fleming 
(of Penicillin fame) had thought only of 
getting rich quickly? 

Hy local computer club gave me your ad- 
dress and permitted me to review their arch- 
ival copy of your premier issue. They are 
very much opposed to unauthorized duplica- 
tion of copyrighted material, but they do 
not presume that the First Amendment to the 
Constitution was repealed with the advent of 
the home computer. 

I am behind you. Enclosed is $50. Please 
enter my subscription. I would desperately 
like to have my own copy of your premier is- 
sue. Since I have nothing to advertise, the 
balance should be considered "user support". 

Sincerely, 

John B. Matthews, H.O. 

Dayton, OH 



Dear Bev, 

I received the first issue of your maga- 
zine and was delighted! Nay your efforts be 
rewarded, and may your magazine prosper. 

However, I predict that your magazine 
won't last a year! Part of the reason being 
of course, that the computer fraternity will 
not take kindly to you. Ouite frankly, how- 
ever, the seeds of your destruction are of 
your own making. 

1. ADDRESS: I had to search through your 
magazine to find your address. It should 
have been inside the front cover. 

2. ATTITUDE: Your maverick, "damn every- 
body else" attitude offends me; and I happen 
to agree with your viewpoint. You can say 
what you want to say without repeating over 
and over that the rest of the computer maga- 
zines are indulging in censorship. They're 
just protecting their interests! Disagree 
with them, please do... but don't make them 
out to be worse than they are; it cheapens 
you. 

3. CURRENCY: You wrote a fine article on 
Akalabeth, assuming that only the 3.2 ver- 
sion was available. I have the 3.3 version 
and so your major article was of no value to 
me. I do not have the Programmers Aid chip 
and so was not able to use Demuffin Plus. 

4. PUBLICITY: You are going to need pub- 
licity and advertising to survive. I doubt 
that you will attract advertising as long as 
you adopt your "underground" style of edit- 
orializing (?). However, and if you ignore 
the rest of the letter, pay heed to this; if 
you can not get publicity any other way, try 
this. Prepare a DOS utility that really 
does it all. Good documentation and out- 
standing advertising are essential. Price 
it lower than competitive utilities on the 
market. Then with every order, ship out a 
sample copy of your magazine together with a 
subscription form. 

I really do wish you every success in 
your venture, and hope that my pessimistic 
prediction be proved totally wrong. Looking 
forward to receiving future issues. 

Yours truly, 

Terry Cashin 

Burnaby, B.C. 



The staff of HardCore Computing would like to thank all those who wrote us, even if your re- 
sponse to our magazine and its policies were negative. Most of the letters we received were 
positive and suggested improvements, asked questions, and gave opinions. We appreciate all 
of those. HardCore is in the important formative stages of growth and your correspondence do 
aid us in making editorial decisions. So keep those letters coming! ===bev. 
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Gentleaen: 

Although it seeis at tiaes like Mr. Bev 
Haight protests overmuch about the goliaths 
of the software industry aanipulating the 
other coaputer magazines, I do think he has 
a point. 

It aakes ae wonder why I have never read 
how to get into a "locked 11 disk prograa that 
cannot noraally be listed. This inforaation 
is certainly known by better prograaaers, 
yet I have newer seen it in other publica- 
tions. After using your "open heart surger- 
y" aethod we were able to get into the Tea- 
pie of Apshai prograa and the Coaputer Am- 
bush prograa. 

Ky 14-year-old son is the one who bene- 
fits froa this. He is now able to view the 
prograa listing, aake changes and, as he 
puts it, "cheat" to aake it easier to win 
the gaae. All of these things help bin 
LEARN how to better use the computer. He 
can learn prograaaing techniques used by the 
professionals. Hurrah for HardCore for giv- 
ing us this opportunity! Keep the inforaa- 
tion coaing. I will certainly recoaaend you 
to ay Apple user friends. I look forward to 
your next issue which you indicate will tell 
how to get into Integer and Binary prograas 
that are "locked" and unlistable. 

Yours truly, 
Gary L. Schaitt 
Hheaton, 1L 



Gentleaen, 

I have no idea whether or not I will like 
your aagazine, but anyone censored for in- 
tellectual reasons can't be all bad. 

U. Buchaan 

Los Angeles, CA 



Dear Charles and Bev Haight, 

I liked the following articles: 

1. DiskLock Update: How to copy-protect 
your disks. 

2. flit Copy Prograas. 

3. SoftKeys to Akalabeth and Applesoft 
disks. 

4.CHR$(4) Utility RHTS: DiskEdit. 
5. DiskLocks: How to copy-protect your 
disks. 

Host of the other articles did not appeal 
to ae. People are subscribing to your aaga- 
zine to learn how to crack copy-protected 
disks like your advertising suggests. You 

continued on page 35 
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I failed to catch an error in Issue #1, corrected it 
in an Alert and again in the Update. I then discovered 
that there was an error in ay correction, and I corrected 
it in later printings of the Update. This tiae I'll get 
it right. Here are the corrections to the article on 
DEHUFFIK PLUS, steps b and c. 

P 



1900< B800.BFFF Ctrl Y* return 
1900< B800.BA10 Ctrl Y return 



/' 
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apologies 

Welcome to the editor's apology... 

Both ay brother, Chuck, and I are new to the aagazine 
publishing business and there are aany "tricks of the 
trade" that we nust learn in order to run this aagazine 
efficiently. 

Beginning on a shoestring, we aanaged to gather a 
saall staff of coaputerists who had skills that this ia-- 
gazine needed and we put out the first issue. All were 
volunteers, of course, working fulltiae at other jobs and 
spending their free tiae Baking this aagazine as profes- 
sional at they could. He proaised to be a regular quar- 
terly with aonthly updates on iaportant coluans. In this 
we have failed. The aagazine took aore tiae than ue had 
and we underestiaated the negative, anti-"hardcore" atti- 
tude of the aajor software houses. This realization has 
discouraged soae and instilled aore fighting spirit in 
others. Added to these probleas was our inexperience in 
the publishing end of coaputering. And the result was 
a very late printing of issue #2. And just as the two 
Updates following issue #1 was combined into one, we find 
that we will be forced to do the saae for the two Updates 
following issue #2. 

Like aany businesses in the expanding aicrocoaputer 
field, we operate froa a residence with the hope that we 
aay soon be able to afford an office, and a real salary 
for the volunteer staff. So far, the only people who 
have been paid are the printers, typesetters and graphic 
designers who aake the aagazine the professional appear- 
ing periodical that it is. The actual staff however need 
auch aore experience in publishing... experience they are 
fast accuaulating as our readership grows and our sub- 
scribers increase. He still need aore aanuscripts that 
fit the publishers guidelines and we hope to be able to 
pay coapetitive aaounts soon. 

Thank-you for your patience, understanding, and espe- 
cially your support as we battle for a place aaong the 
national coaputer aagazines. He really do try harder! 
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Hardcore Computing 

There are many varied opinions on this topic 

Last issue, the editor made ctear his opinion of copy-protection. I did not then express 
mine. And some of our readers have mistakenly assumed that my opinion coincides wtth his. 
It does not. 

The editor and I agree on many points, enough to collaborate and produce this 
magazine. However, we do disagree on other points. Copy -protection is one of these. The 
editor is a hard-core "First Amendment Advocate," To him, programs are just another form 
of literature, specifically: instructions derived from algorithms and written in a way that a 
device can interpret and carry out those instructions . . . much like the holes in a player- 
piano's music roll is a program for the piano to play particular musical pieces. 

I am not an editor, certainty not a journalist. I am, instead, a computerist, a program- 
mer, and a businessman. Copy-protection, to me, is simply a means of assuring greater 
monetary compensation for a publisher's venture capital and development expenses as well 
some royalty for the authors. In a market where the viable revenue-producing life of a par- 
ticular product specifically a mass-marketed computer program, is measured in weeks, it is 
important to assure widespread publicity and distribution of such a product before that pro- 
duct is made universally available via personal exchanges. Game programs have the 
shortest profitable lifespan. For these ephemeraify profitable products, I think that copy- 
protection is a necessity. It prolongs the profitable lifespan of the product and there is no 
great need to alter the product. 

Of course my editor disagrees. "Any form of so-called copy-protection," tie argues, "that 
hinders that program's listing, modification and subsequent re-copying, is an affront to the 
software consumership and should not be tolerated in America!" He is quite verbal and 
outspoken on this issue, and just as dogmatic as the software companies that defend their 
"anti-piracy" schemes. 

For those who agree or disagree with the editor, be sure to direct your arguments 
toward him. My views are not exactly his. 

If copy-protection is going to remain as the industry's standard-operating -procedure, 
then consumers should focus their attention on the back-up and update policies of the soft- 
ware vendors, their warranties and their guarantees. After all, if we cannot make copies or 
modify these programs, we should demand that the industry have reasonable and adequate 
policies to back-up crashed disks and to provide updated versions when improvements are 
necessary. We should also demand product excellence since we are not given the option of 
de-bugging and improving them ourselves. 

In other words, the present "buyer beware" syndrome is not good for business and is 
certainly not good for the consumer. 

Although I agree that in some instances copy-protection is necessary, I do not agree 
with the present situation where computer is ts are denied useful information because the 
software industry has undue influence and control of the sources of information, specifically, 
the magazines, the computer stores and some major "user's" clubs. Both the editor and I 
agree on that one disgusting fact. Somehow, the users must be made aware of the present 
situation, a condition of ignorance created by members of the software elite who now own or 
operate software houses and are in control of computer clubs, stores, and magazines. This 
condition is perpetuated by users who condone or tolerate censorship and information sup- 
pression in the guise of "protecting the public" or "combating piracy." 

lam conviced that in many clubs, this software elite is using censorship and information 
suppression in order to maintain what my editor calls the "conspiracy of silence" that now 
reigns supreme. Unless the members are made aware that they are being manipulated, 
and unless they stand up and speak out against these "agents of ignorance," the strangle 
hold on knowledge will tighten until a chasm forms, . . with those "in the know" on one side, 
and those "hoodwinked and manipulated puppets" on the other. And you can guess who will 
be using and abusing the other. 
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v.s, Copy-Protection 

even among the members of our editorial staff 



That is the reason why we formed this magazine. We have created a bridge over that 
growing rift between the sellers and the buyers, the manipualtors and the manipulated, 
because the only difference between the two is: information, specifically knowledge of copy- 
protection. 

This magazine is not out to "get" any software company. HardCore is a medium for the 
expression and distribution of ideas, opinions, directions . . . some of which are, unfor- 
tunately, barred from expression in the other major computer magazines. 

HardCore is not a "pirate's" magazine any more than a pharmacist's journal is a "drug- 
abuser's" magazine or a periodical on guns is an "armed-robber's" magazine. 

That we are called such is a very real measure of the fear that the information in our 
magazine will free the user from the dungeon that the sellers have created. It is the fear that 
censorship and information suppression is effective only so long as there are no "security 
leaks of secret information " 

HardCore is not in the business of removing copyprotection from specific programs 
because we do not have the time. The SoftKey to Akalabeth was used simply as an example of 
how certain techniques are done. Such SoftKeys will be published only when accompanied by 
a legitimate "Fix" or program improvement. I feel that SoftKeying every single program is 
useless since ail that needs to be done to re-protect the product is to utilize another protec- 
tion method. A better way to help readers is to show them how such "protection" is 
accomplished. By removing the air of magic (wonder and ignorance) from copy-protection, 
readers can analyze and down-load their own programs irregardlessof how the vendors may 
alter their schemes. 

HardCore is against commercial piracy in any of its forms. However, my editor feels that 
personal exchanges, especially of modified commercial programs, is the right of the buyer. I 
feel that casual exchanges do hurt the market but no more than book and record exchanges 
(including personal recordings from copyrighted releases) hurt the book and music business. 

I do not advocate nor do I approve of commercial piracy. However, it is impossible to 
halt exchanges between computerists simply because the duplication process is far to easy 
and commonplace to prevent. I feel businesses should cease their expensive efforts to battle 
such exchanges and instead take advantage of them. There is little else that can be done 
while still maintaining a cordial consumer-vendor relationship (a relationship that is rapidly 
deteriorating since the advent of copy-protection). Many feel that such a "lock" is unethical 
and that it is their duty to free it! Some, like my editor, feel that "any business scheme that 
requires, for its survival, massive media censorship and suppression of information (such as 
copy- protection) is an abomination to the free market system and is a threat to the American 
independent free spirit" (Please excuse his frequent flag-waving but, as I explained early on, 
he is a free-speech, free-expression radical). 

I sympathize with both the consumer and the vendors, publishers, and distributors. 
That is why I am offering an alternative: "piratable" software. For more information on this, 
see the article on "HardCore Program Librarv Honor Royalty Diskettes." With these disket- 
tes, computerists are urged to exchange them . . . with a catch: They are also urged to send 
the buck -a -prog ram -copied directly to the author as royalty. The reason the "price" of a copy 
is only a buck is that there is no advertising cost and no copy-protection expense added in 
since the person exchanging the program is actually the advertising medium. Whether or not 
this method will succeed is debatable, but one thing is for sure . . , with this method in 
prevalence, there will be a marked drop in "piracy" simply because there will only be those 
who have and those who haven't honored the author with the token royalty payment of a 
buck-a-program-copy. 

I welcome responses to my own opinions. 

Charles R Haight, 
Publisher 
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FINANCIAL 
MANAGEMENT 
SYSTEM II 

A HOME AND BUSINESS 
ACCOUNTING SYSTEM 
FAST - EASY TO USE 

Enter an entire month's CHECKING, 
CHARGE CARD, and CASH accounts in 
just a few minutes using your own person- 
alized macro lists. INSTANT ERROR 
CORRECTION Audit all files by Code and 
Month with year-to-date totals. PERFECT 
FOR TAX ACCOUNTING. 

- SELF PROMPTING, ERROR AVOID- 
ING ENTRY SYSTEM. 1 to 3 KEY- 
STROKE entries with AUTOMATIC 
DATE, COOING and NUMBERING. 

• SCREEN and PRINTER routines for 
listing files, balance, reconcile, search, 
and audit reports. Configure system to 
match almost any printer. 

. BUDGET MANAGER to plan, review 
and balance your budget, generate 
COMPLETE reports for any 1 - 12 
month period. 

SEARCH all files with specific and 
expanded searches. 
ACCOUNT AUDITOR totals all files by 
Code and any 1 - 1 2 month period with 
year-to-date totals. 
Enter your own I tern and Code Macros, 
up to 100 each. 

48K with ROM APPLESOFT and DISK 
required, SINGLE or DUAL DISK com- 
patible, (printer optional) 
PRICE $39.95 

•""NOW AVAILABLE***** 

CHECK WRITER II for FINANCIAL 
MANAGEMENT SYSTEM II. Print your 
checks directly from FMS II files. 

- PRICE $19.95 - ($15.00 if ordered with 
FMS II) 

GROCERY LIST 

A USEFUL HOUSEHOLD PROGRAM 
DESIGNED TD OHGANIZE SUPERMARKET 

SHOPPING 
Shoppers will INSTANTLY be able to use 
this easy, self-prompting program. Scan a 
file of up to 500 USER DEFINED ITEMS. 
Choose those needed with a single key- 
stroke. Then print a shopping list OR- 
GANIZED BY TABLE NUMBER, SECTION, 
or four letter code such as "DARY", 
"BAKE", or "DELI". 
~ 32 -48K with disk and printer required, 

(APPLESOFT) 

PRICE $19.95 

COMPUTERIZED 
MANAGEMENT 
SYSTEMS 

by H JSRViS COMPUTING INC. 

1Q39 Cadiz Dr. - Simi, CA 93065 
PHONE 1805) 526-0151 



HARDCORE 2.0 P- - Bo * 44549 Tacona, HA 98444 



What exactly is a program 7 
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Micro- computering is a rapidly expanding field that is 
opening up marketing frontiers and some thorny legal 
wildernesses only imagined a decade ago. New definitions 
and laws must be created to handle the problems emerging 
as users and producers struggle to shape this new market of 
intellectual creations we call; computer software. 

Embodied in what we call a program, this product of in- 
tellect has the potential to renovate our entire concept of in- 
formation and its exchange. 

Is a program merely a collection of equations, public do- 
main information garnered through mathematical -scientific 
research and hence both unpatentable and uncopyrightable. 

Is a program a device, like holes punched in a card 
(template) that allows a machine to accomplish certain tasks. 

Is a program merely a set of instructions which, because 
they are only directions that tell you how to do things, are 
copyrightable only as directions and not as something more: 
an idea? 

Or is a program the written expression of something 
more intangible, the reaching for a goal, the completion of a 
task, a process? 

Can it, or should it, be patentable, as a concept that lets 
you reach that goal? 

In other words, should programs be copyrighted or 
patented? 

Or should programs have a separate, new category of 
registration that combines the two aspects in a technological 
hybrid that a program truly is? 

f believe that this last alternative is one that will benefit 
both the computer user and the world as a whole. 

An entirely new category should be evolved: one that 
reflects the true nature of computer programs, one that 
recognizes both the patentability and copyrightability of cer- 
tain facets of a program as well as the protection of the visual 
display. 

An entirely new category should be evolved: 
one that reflects the true nature of computer programs, 
one that recognizes both the patentability and 
copyrightability of certain facets of a program as well as the 
protection of the visual display. 

one that recognizes that, regardless of the language it is 
written in, the essence of the program is the same whether it 
is in FORTRAN or BASIC or some other language, 

one that wiil give the author certain rights on the com- 
mercial use of that program, but also 



one that recognizes the lesser but just as important 
rights of the author who translates it into other languages. 

It should be one that, like the patent laws, recognizes that 
certain ideas, or computer tasks, are commonplace or 
necessary and can be derived by a person knowledgeable in 
that field and therefore are not patentable, but that some 
tasks and their solutions are unique and should be registered 
as such. 

(While copy-protection, that is, protection from direct 
duplication, is a major concern among vendors, I am not refer- 
ring to this form of protection. Rather, I am discussing the 
stealing of entire ideas and their modes of expression, it is 
that type of copy-protection that must be addressed by the 
legal community. 

This is especially important in the lucrative field of 
games. Consider the espionage and idea-thefts occurring in 
the board games industry . . . and you can see it happening 
already in computer games). Atari has made it clear that it 
considers the visual presentation of its games as copyrighted. 
If you write or market a program that looks like an Atari 
g3me, then you may have violated their copyrights. Of course, 
its enforcement is made difficult because of the still debatable 
legal classification of programs. 

In making these new definitions and regulations, we 
should not forget the user, the consumer. Programs in this 
new category must be recognized as devices as well as 
literature, devices that can and should be alterable and 
repairable by the consumer, just as you can alter any physical 
product you purchase. We should not be forced by laws to de- 
pend entirely upon the vendor's updates for improved pro- 
grams. We should be allowed to improve them ourselves! 

Owners should be able to sell that altered product just as 
owners can sell any other device they own. 

And because the programs can be so easily and inexpen- 
sively duplicated, it is imperative that this new category or 
classification be instituted in such a way that the consumer's 
right to make archival copies is not trampled in the pro- 
ducers' haste to protect programs from copyright in- 
fringements. 

It's a brave new world out there and we should not let the 
vendors, marketers and writers of programs create laws that 
will not be in the interests of the consumers. 

And unless we view programs in this new and separate 
category, the consumers will be the losers, ^ 



Let's all become Disney-Universal pirates 
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Our individual rights are being eroded again. Did you hear 
that tiie 9th U.S. Circuit Court of Appeals in San Francisco 
has ruled that the users {and the makers and distributors) of 
the video-cassette recorders (VCRs) are breaking copyright 
laws if the machine is used to tape over-the-air broadcasts of 
programs that are copyrighted (most commercial broadcasts 
are, by the way). 

That means that if you want to watch a program on TV but 
cannot be there at the time It is shown, then it is illegal for 
you to tape it for later viewing! And if you do, then you are a 
PIRATE. Outrageous! 

This is just part 2 of the battle between Sony and the team 
of Disney Studios and Universal Pictures whose goal is to 
make restrictions on what you can do with your own TV set in 
your own home. 

But according to an AP release, industry officials and 
analysts predict that Americans will go on doing so anyway, 
whether it is illegal or not. Those are my kind of Pirates, my 
kind of Americans. 

Of course that decision will be appealed ait the way up to 
the Supreme Court. Meanwhile, there's a move to amend the 
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copyright laws in order to legalize the sale and use of the VCR 
for persona), non-commercial copying. I agree with this 
legislation, of course. 

Could such court decisions be eroding your individual 
rights right now? 

Could industry tell you what you can or cannot do in your 
own home? It's happening right now. Another example that 
comes to mind is a move by the recording industry in England 
to put a tax on blank recording tape and give the tax collected 
to the recording industry to make up for revenue tost by 
people recording music off the radio! Talk about government 
hand -outs! 

Could this happen in America? Could Sony be forced to pay 
a tax or penalty tee for each Betamax sold, a fee to be 
donated to the "poor, penniless magnates of the woefuRy 
endangered" movie-TV industry? They could. If you stand by 
and let them. And if you didn't know it was happening, then 
so much the better for Disney and Universal. 

So be warned. Everyone who uses a video recorder to 
record off commercial TV is now a Pirate, too. Welcome, 
pirates, to the ranks of your fellow independent Americans. 
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Piracy On The High Keys 



The word "Pirate" is being thrown around quite a 
bit these days. Some software companies would HkB 
you to believe that if you trade software you are a 
Rogue, a Criminal, a Despicable Thing. 

What they neglect to realize is that we, the com- 
puter owners and users, have rights, too. We have the 
right to buy software and what we do in the privacy of 
□ur homes is none of their business. 

Actually, the software companies are in business 
because of us. We keep them in business and we can run 
them out of business. So where do these people come 
off calling us Pirates? The accepted definition of 
"Pirate" in the record industry, video tape industry, 
and ail other industries is: a person or company who 
makes many copies of somebody else's work and then 
sells it, taking the profit for themselves. By this defini- 
tion, I have never met b pirate. 

The main consideration here is money. The soft- 
ware companies are pulling in huge amounts of money 
each month. Otherwise they would get out of the 
business. They are not stupid. 

Then why the "hue and cry"? Because instead of 
making small fortunes, they want to make large for- 
tunes, so they cry all the way to the bank. Poor babies! 1 1 

One question always pops into my mind. Where are 
the original "Pirates"?. ..the ones who broke and trad- 
ed programs a year or two ago? Answer: They are now 
running the software companies I! They are the pro- 
grammers and businessmen of those companies! I In 
other words, it was alright to trade programs when they 
did it but, now that they are in the business and making 
money from software, suddenly it is wrong to trade. 

Another thought is. ..Why did people start copying 
software? Perhaps if software was reasonably priced 
{greed again], and all programs on the market were 
worth the money and were error-free, there would be 
less of the so-called piracy. So who is to biame for the 
high prices? Who is to biame for the poor quality soft- 
ware on the market? Most of us have been taken at one 
time or another. Has anyone ever seen or heard of any 
attempt by a software company or computer magazine 
to police the market or criticize a competitor selling 
garbage???? 



by ArtCoN 



Speaking of computer magazines, the "impartial 
voice of the industry". ..what are they doing? Are they 
presenting both sides of the conflict? Are they being 
honest and deserving of respect? Not just NO, but HELL 
NO! They support the software companies. They pre- 
sent only one side of the argument and continue to 
advertise garbage programs. So much for integrity. If 
some users got together and agreed to buy just one 
copy of a magazine and made copies for all the others, 
then I could understand the magazines complaining. 
Software is none of their business unless they sell soft- 
ware themselves, in which case there may be a moral 
conflict of interests. 

So why do the magazines keep calling us names? 
The answer is the almighty buck. They must cowtow to 
the software companies so as to get their advertising. 
They follow Ska spineless sheep licking the boots of 
whoever pays the most. Sickening, isn't it? 

I would like to state that not all software companies 
and magazines are the targets of this article. Any 
magazine that would publish this is obviously not includ- 
ed. As far bs software companies — those in the 
magazines are excluded by virtue of the fact that they 
advertise in HARDCORE. You know what I mean. 

What it a* bate down to is which side of the fence 
you are on... buying or selling software. Someone who is 
considered a pirate by some may be considered a 
fighter, buccaneer, or "admiral-able" by others. If the 
software companies and magazines continue their mud- 
slinging perhaps we might think of a few names to call 
them. Words like Garbagemen, Junkmen, Cheap 
Chiaelers, Hypocrites, Conmen, end Thieves might app- 
ly to some. Yeftow Journalism, Toilet Paper, or Comic 
books might apply to others. 

And last but not least, if some still continue to use 
nasty names and insults, the computer users might use 
their ultimate weapon. He could stop buying their pro- 
ducts. Wouldn't it be nice to hsvs en Independence 
week or month or year when nobody buys their soft- 
ware? Then what would those software companies 
say??? 
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Software Piracy 



the 



If one believed the various articles about software piracy , 
then one must feel that the vendors are in e desperate situa- 
tion. Most editorials point out the many wrongs done to the 
software companies by the consumers which, if continued, 
would justify additional protection in the form of stiffer laws. 
While admitting that software vendors are not perfect, the 
articles place the greatest blame for the present problems on 
their customers. 

Yet the situation does not appear to be as claimed, for the 
number of programmers entering the merket is increasing 
[just check the size of the advertising in the magazines writing 
those piracy editorials.] It is hard to believe that the newer 
programmers don't know about the " rip-off s" or that the 
older ones enjoy it and come back for more [masochistic?]. 
The whole situation sounds more fike a case of crying all the 
way to the bank. 

Besides, the software vendor has piled some of the pro- 
blems onto themselves since it is their policies which have 
forced people to seek alternatives. The use of copy protec- 
tion without offering a reasonable backup is one of the big- 
gest complaints of the present. People cannot count on any 
company staying in business forever or meking changes in 
the software to cover special applications. In addition, the 
"juggling act" that one must go through when switching 
disks is not very funny: 

The best answer to me piracy issue would be to find 
other similar industries that have faced the same problems. 
Such industries include the book and record businesses . With 
sales of over 200, DOO Apple systems, the software market is 
comparable in size to that of either books or records. Also, 
few can disagree with the fact that the amount of time spent 
on writing a book is no less than that spent on writing soft- 
ware - in case you doubt this, consider the work behind 
researching, rewriting, and proofreading. 

But the biggest similarity between tile three industries is 
the one we are most interested in, namely the piracy problem 
which they all have faced. Record sates were threatened by 
the low cost of blank magnetic tape, while the book industry 
suffered losses due to the practice of trading books instead of 
purchasing them. In both markets when the first copying 
mediums became available, there were the same howls of 
rage as are echoing around at present. 

Yet, while the three industries have similarities, it is their 
differences that are the most noteworthy, particularly the 
mature attitude of the book and record businesses toward 
their customers. The only pirates that are prosecuted are the 
large scale operations with little attention paid toward the in- 
dividuals who copy rather than buy. Due to the aveilebility of 
cheap alternatives, the industries were forced into developing 
lower-priced products in order to obtain 8 high sales volume, 
with the higher prices going to the "limited market" items 
that are highly specialized. 



The greatest difference is the accessibility of information , 
for in a book it can neither be hidden nor restricted. One can 
creete a new or improved version of any Idea with the general 
limitation that the idea's source is identified. This easy use of 
information is sweetened bv the fact that far more informa- 
tion is obtained from a book than from a protected disk per 
dollar spent. 

The attempt to nide information through the use of copy 
protection is probably the biggest exercise in futility at the 
present. There are mom neoote breaking Dmtpctinn schemes 
than there are creating them, and there Biways win oe more 
js long as people have more time than money. Besides , there 
isn't e scheme that can't be decoded by watching the data/ad- 
dress lines of the microprocessor with a logic analyzer - not 
expensive if the computer is converted into one]. Of course if 
the protection schemes become too costly or incompatible, 



by Joe Zuis 



then the consumer can always use his best weapon - no pur- 
chases. The low sales of computer systems using a hardware 
"lock in" should prove my point. 

The most ludicrous attitude in the piracy problem is that 
of the vendors who ask for all kinds of restrictions and laws, 
only to issue a disclaimer or a "as is" clause on their product. 
They give the impression of wanting everything without tak- 
ing any responsibility for anything. Dne is not likely to buy a 
product with such limitations unless its price is appropriately 
discounted. Also imagine a record company telling you that a 
record can only be played on one specific player - those with 
two players would have to buy two records! This type of at- 
titude is what helps to cause the nonchalant posture of many 
pirates because it is the actual policy of soma software 
houses. So while I agree a change is needed. I would like to 
know why only one side should have to change its mode of 
operation. 

SOLUTIONS FOR THE CONSUMERS; 



Along with the criticism, I have advice to offer as well. 
The most important thing that people can do is to write let- 
ters to the vendors, stating any complaints as well as any in- 
tentions of not buying a product until the complaints are 
answered. Copying a program does not convey the proper 
message or indicate the true number of dissatisfied potential 
customers. If enough people expressed an interest, a com- 
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TEN 
-copyprotection- 

COMMANDMENTS 

Thou Shalt: 



1. NOT EXPECT CUSTOMIZABLE PRO- 
GRAMS for that means that thou should write 
your own. 

2. MOT RETURN PROGRAMS IF NOT 
SATISFIED with product for thou may have 
made a copy of it. 

3. NOT JOIN ANY COMPUTER CLUB not 
controlled by a software house or you shall burn 
in Micro-hell. 

4. NOT MAKE BACK-UPS of copy-pro- 
tected programs for then thou shalt be a vile 
and wicked sinner. 

5. NOT ALTER PROGRAMS to fit thy 
needs for to do so thou must break this holy 
lock and that is a sin most evil. 

6. NOT LEND PROGRAMS TO OTHERS 
for all others are Pirates. 

7. NOT TAMPER WITH THIS HOLY LOCK 
or the program will destroy itself. 

8. NOT COMPLAIN ABOUT THE LACK OF 
WARRANTIES, guarantees, or other promises 
given by other industries. 

9. NOT EXPECT LOW-COST UPDATES 
and corrections for you are our sheep and we 
are fleecing you. 

10. NOT BUY, READ, OR TALK TO ANY- 
ONE ABOUT HARDCORE COMPUTING. 




by the editor. 
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Another meaningful step would be to establish magazine 
forums where people can list the desired features of any 
type of program. By openly discussing the good and bad 
points of each feature, people can team from the more ex- 
perienced programmers, and at the same time establish a 
list of standard features to be used as a guidetine by the pro- 
grammers. A readers' pod at the end of a time limit would in- 
dicate the most desired features as well as the number of 
prospective buyers. 



The forum could also be used to standardize reviews by 
indicating missing or confusing information with the intention 
of eliminating some of the bias or opinions. The features 
listed in the forum could be used as a standard with more 
time spent on reviewing the limitations or extra aspects of 
the program. Hopefully this could make choosing software a 
little easier. 



Software companies should be encouraged to use 
magazine articles to answer customer questions instead of 
using the present system of individual responses. If the 
documentation listed the magazines in which to watch for 
their articles, more people could be reached with less 
necessity for answering the same questions repetitiously. As 
a side benefit, the vendor would be paid for answering his 
customer's inquiries. But if the article becomes an advertise- 
ment, it would only turn people away or cause them to go 
beck to expecting individual answers. 



The various clubs could coordinate their software pur- 
chases so that each one buys e different package of a given 
category. With swapping between clubs, people can inexpen- 
sively try the vanous products, and decide for themselves 
whet is best without depending on someone else's opinion 
Also, a group buy" could be arranged for the best possible 
price break. 



If the situation does not improve, then the customers 
should organize, just as the programmers are doing in order 
to lobby for fair changes in the laws. 



As an alternative, the group couW establish a list of 
features and hire a programmer to create the desired 
routines. The obvious advantage would be that the group 
would own the source code, eliminating the hassles caused 
by copy-protected programs. Modifications would be easier 
and cheaper, while programming techniques could be 
observed and improved. The cost to a large organization 
would be less than on the open market, and the programmer 
would know exactly how much he is earning. 

These suggestions may not be the best ones, but they 
represent an attempt at showing that there are alter- 
natives. The important thing is to not accept any solution 
that is unfair to either the majority or the minority of the peo- 
ple. There are reasonable laws and sensible approaches, but 
it is the continuation of the ridiculous ones that wi cause an 
eventual rift. _^. 



The editorial staff of HardCore Computing as well 
as the staff of SoftKey Publishing would like to thank 
all our readers who have supported us in our attempt 
to become a leading professional computer magazine. 
HardCore began as an idea expressed in two small ads 
that we carefully worded so that they would get by the 
ad censors. It was published in Call A.P.P.L.E. and 
in Softalk magazines and it brought us about ZOO sub- 
scribers and several ads that were printed in the pre- 
mier issue. We also sent out junk mail flyers to ad- 
dresses and names we got from other magazine pages. 

It was then that we actually put together the mag- 
azine itself. Little did we realize how costly and 
time consuming that process would be. We got help 
from professional printers and graphic artists. We 
commissioned an artist to do the cover. And we got 
the first issue out, late. Only 36 pages, it was our 
best effort. 

Our second issue, we vowed, would be 64 pages. The 
same artist, now a regular staff member, did the cover 
again and redesigned the interior. We got together new 
writers, and the second issue was moving smoothly, but 
even more late. Then we had trouble with our computer 
and printer, and had to rely on our local friends' 
equipment. All this was done during our free time, of 
course. Then, suddenly, several members had to leave 
and we were short of help. But we did what we could. 
Now HardCore #2 is out and we're working on #3. Finan- 
cially, HardCore was still in the red, but our subscri- 
bers now have edged over the 1000 mark. We have been 
inundsted ijy telphone calls... and we are out of the 
"office" most of the time, anyway, so we haven't been 
able to answer many of them. Sorry. 

Those of you who are editors of club newsletters 
and magazines know what we mean. We are all still 
basically computerists who have tired of the way other 
computer magazines have been handling information that 
Apple-ites desire and have tried to do something about 
it 

So please be patient with us, and in the beginning 
judge us not by our late arrivals but by the informa- 
we have presented in our pages... because that has 
always been our priority. 



Issue #3 will appear in February, instead of Jan- 
uary. And, instead of two updates between issues, 
there will be only one. We hope to have at least 64 
pages, more programs, and many more articles (fewer 
on opinions, arguments, etc, though), programming aids 
and helpful hints. Happy Holidays! 






HARDCORE 2.0 P.O. Box 44549 Tacoma, NA 98444 page 11 




I 




copy controversy and Hardcore's Editorial poller. 

a letter from: Val Golding 



Val J. Golding 
6708 39th Ave. S.W. 
Seattle, WA 98136 
July 23, 1981 

Dear Mr. Hatght 

I thank you for the complimentary copy of 
the June, 1981 HARDCORE, and the oppor- 
tunity to respond to your articles and editorials. 

I would like to'be able to express my wishes 
for the success of HARDCORE, because I 
believe, in general, that the more information 
that appears in printed form, the more the 
Apple user will benefit, but 1 cannot because I 
fee) the policies you encourage are to the 
ultimate detriment of the user. I would like to 
add, also, that the opinions expressed in this 
letter are my own, and may or may not coincide 
with those of Apple Pugetsound Program 
Library Exchange, the publishers of 
call-A.P.P.LE. 

1 think that it is a sad commentary on the 
state of reportage — witness the Washington 
Post episode — that those in positions of 
responsibility are not always making the 
necessary checks to ascertain the accuracy of 
their reporting, particularly when that reporting 
has the potential of irretrievable damage to the 
credibility and livelihood of individuals and 
organizations. 

I am referring, of course, to your Interview 
with Dave Alpert, which contained many in- 
accuracies, and in addition alluded to facts 
which Mr. Alpert was not privy to. In a court of 
law, the statements made by Mr. Alpert would 
not be admitted without verification by other 
witnesses; they would be considered hearsay, 
third party conversations. In each instance, Mr. 
Silverman and Mr. Golding would be called as 



witnesses to relate the facts as they understood 
them. This is what we strive for in good repor- 
ting, accuracy and verification from as many 
sources as possible of each alleged fact. You are 
asking your readers to draw conclusions based 
on hearing the evidence presented only by the 
prosecution. 

While the damage has already been done, I 
would like to correct some of the impressions 
that were made In the interview with Mr. 
Alpert. In his second response, he accuses me 
(along with Bob Tripp, editor of Micro) of telling 
people that they would not be able to get adver- 
tising if they ran the Locksmith ad. This is com- 
pletely untrue; 1 made no such statement, nor 
did I imply that that possibility existed, although 
! believe it did. Mr. Alpert then states I threaten- 
ed to "destroy" the International Apple Core 
newsletter by pulling the material submitted by 
A.P.P.L.E. if the Locksmith ad was accepted for 
publication. This, too, is inaccurate. As an in- 
dividual (and I do feel very strongly on this 
volatile subject) I did say that 1 would not allow 
any stories with my byline to be printed, in addi- 
tion, I also indicated that A.P.P.L.E. might con- 
sider as a possible action, the withdrawal of 
material contributed by them. This action was 
never formally considered or approved. 

Mr. Alpert states that I have "since been 
replaced" (as editor of the Apple Orchard) with 
the innuendo that I was being replaced because 
of my position on the ad and/or threatening to 
withdraw my stories. Here, Mr. Alpert is 
discussing a subject in which he is not in 
possession of all the pertinent facts. The subject 
of my resignation from the position of editor of 
the Apple Orchard was opened in correspon- 
dence with Ken Silverman, president of the 
l.A.C, long before the subject of Locksmith 



Val Golding is one of the leading figures in 
Apple Computering on the West Coast. He is 
presently the Editor of Call-A.P.P.L.E., a 
publication of the Apple Pugetsound Program 
Library Exchange based in Seattle, Washing- 
ton. He Is also one of A.P.P.L.E.'s directors as 
well as the former editor of the Apple Orchard, 
a publication of the International Apple Core. 




came into the limelight. It was based on my 
growing dissatisfaction with the direction in 
which the magazine was proceeding, the lack of 
cooperation from the publishers, and the 
pressure of other business which prevented me 
from devoting the necessary time to the editing 
of the Apple Orchard. I, in fact received a 
beautiful wall plaque from the members and of- 
ficers of the International Apple Core express- 
ing their "gratitude and thanks. ..for serving as 
Editor", and I further continue as "Editorial 
Associate" and contributor to the Orchard. 

Although this is not the full extent of the im- 
plications put forth by Mr. Alpert, some items 
are better responded to on a non-personal basis 
by A.P.P.L.E., upon which it would be inappro- 
priate for me to comment as an individual. 

It is regrettable that you have not seen the 
potential of positive actions. I am the first one 
to agree that the software industry itself is 
largely responsible for the current state of 
events. I for one would pay not one dollar for a 
protected diskette that had no way to back it 
up, nor would 1 buy a program that was so lock- 
ed that 1 could not modify it for my own use. 

We cannot now demand that the industry 
produce unprotected diskettes, but we can in- 
sist that they furnish a low cost, fast back-up 
support. I suspect that fully 50% of the software 
purchaser's dollar goes to the development of 
never-ending protection schemes. And who 
pays Jpr this? The User. The honest user Is get- 
ting ripped off through the short-sightedness 
of the software industry and the minority of 
users who make a game out of giving their 
friends a copy of every piece of copyrighted 
software they can lay their hands on. 

Already the bit copiers are being defeated by 
more sophisticated protection schemes: pro- 
grams are now being sold with hardware anti- 
copy devices. Mo doubt ways will be found to cir- 
cumvent these, too, but let's call a truce. As 
users, let's write good, unprotected software 
and sell it for a decent price. Let's get with the 
industry and beg them to provide backups. 
Let's not make It easier for anyone to steal soft- 
ware. 



Sincerely, 
Val J. Golding 
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Consumers, Computers, &the Law 



It's more than 9 months ABC [Anno Bit 
Copier] and the sky has not fallen in. Despite 
the dire predictions of the software production 
"doom-and-gloom" boys, the introduction of 
Back-lt-Up and Locksmith did not result in the 
demise of the micro-software industry, nor 
even dampen the- market in APPLEware [pro- 
tected or unprotected variety]. Although 
enyone now can copy Visicslc if he wants to, 
the product continues to sell, like the excellent 
program it is. 

Personal Software was apparently so little 
worried about Locksmith and the like, that the 
APPLE DOS 3.3 [1 B sector] version is copiable 
using the old reliable techniques, rather than 
adding new gimmicks which would require a 
new version bit copier [which will soon be on the 
market, anyhow to counter Visi-Trend, Visi- 
Pfot, end Visiwhoknowswhatelse ]. 

Magazines which refused to carry bit 
copier advertising, either out of fear or suppos- 
ed high ethical standards, don't heve eny pro- 
blem with Central Point Softwere's COPY II 
PLUS, which sometimes is "not designed to 
copy 'protected' diskettes," and sometimes is, 
end sometimes can't make up its mind in the 
same magazine [See August, 1 981 Creative 
Computing, pages 119 and 147], 

And a new magazine, "hardcore com- 
puting" mekes its debut snouting about the 
"copy protectors," explaining how to "unlock" 
a papular game program so that a fix and some 
enhancements can be made, and advertising 
Sensible [Bock-lt-Up] Software's "The New 
Protector" software protection program [Will 
Dr. Emery come out with a "New Avenger" to 
counter the "New Protector?"] 

In other words . . . it's business as usual in 
this crazy six-year-old industry. 

But something new is happening. All of a 
sudden the big boys ere moving in to the micro 
market. Take a look, and you see signs 
everywhere. BYTE Magazine is sold to 
McGraw Hill and is now rivalled only by the 
Sears Roebuck catalog for potential damage to 
my mailperson's back. Salesmen congregate 
around professional office setting "distributed 
togic" word pracesors which turn out to be an 
onty slightly souped up 64K Z-BQ, probably run- 
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ning under CP/M. [These things are huge, built 
like a tank, and probably work just as well as 

your smaller but considerably cheaper - 

-Z-BO CP/M system] The "Incredibly Better 
Monster'' company still hasn't arrived with its 
long heralded "micro," but the mighty Xerox 
Corporation beat IBM to the punch with a 
desktop word processor-computer that turns 
out to be a . . B4K Z-80 machine running 
under CP/M. And at a not-unreasonable price. 

In other words, the movers and shakers in 
the computer industry may be coming to the 
conclusion that small isn't bad, and in many in- 
stances may be better. It seems that the Z-BO 
CP/M configuration is becoming a really univer- 
sal system, not just for the hobbiest, but for 
real business systems. [I'm just going to have 
to buy that Scftcard for my APPLE, after all.] 
The B-bit computer software industry is about 
to take a jump into mass-marketing which is 
going to make the Isst B years look tike a tea 
party. 

No, the sky didn't fall, and isn't likely to fall 
in the foreseeable future. To the contrary, op- 
portunity for the small system software in- 
dustry is clearly here. But are the software 
publishers equal to the challenge? I'm sure that 
businessmen will be willing to pay for quality 
software [in a mass-produced kind of way, of 
course) but will they stand still for the sort of 
sloppy products, and worse support, that is 
characteristic of much of the "hobbiest" in- 
dustry? 

These will be halcyon days for software 
vendors, with numbers of potential customers 
that will boggle the imagination. But 
businessmen won't put up with "protected" 
software which might go out at a crucial mo- 
ment because it can't be backed up. 
Businessmen will not put up with software ven- 
dors who refuse to stand behind their pro- 
ducts. Businessmen will not put up with the 
rather whimsical way some software vendors 
prefer to relate to their [hobbiest] customers. 
Example: [Maybe I'll inform my purchasers 
about known program bugs, and maybe I 
won't. Maybe I'll answer a letter — or a phone 
call — with a question, and maybe I won't.] 

When a "Business Man" buys a product. 



and it doesn't work, he doesn't just write a let- 
ter to the editor of a magazine, or complain at 
a Users Group meeting. He tells his lawyer to 
file suit. Take a look at headlines from a recent 
MIS Week . , . "Burroughs Admits to 1 60 Suits 
[Vendor Ends Silence, Says It Will Appeal 2 
Verdicts]" . . "119 Say They're Ready To Sue 
Data Gen." . . . "$75,000 Payment Settles 
Mini Suit" . . . And that's just in the first four 
pages. 

There's going to be lots of opportunities, 
but if software vendors are going to succeed in 
this new, " Micros- Are-Real-Computers-For- 
Real-Business-Uses-Now" world, they're going 
to have to get their acts together And after 
getting used to doing things right for some of 
their customers, maybe the software people 
[who are left] will start doing things right for 
the rest of us. 

Because a most obvious difference be- 
tween business software and non-business 
software is that it doesn't really pay to enforce 
one's rights when amounts of money are small 
and when damages flowing from a breach of 
contract are calculable mainly in terms of lost 
enjoyment, the hobbiest must seek other 
avenues. 

Ons thing Ghat habbiests can do, 
however, is to band together and ax- 
change information on which product 
del Ivors on its claims, and which company 
just doesn't stand behind its product. 

tn this column we will Bttempt to sort our 
legal rights Bnd wrongs, both in theory and in 
specific examples, that come to our attention 
from time to time and that have been sent in by 
our readers. If you feel particularly aggrieved by 
a company or product, write and let us know. 
Send copies of any promises made by the com- 
pany [including advertising and claims in 
documentation] and an explanation of what 
went wrong, how you notified the dealer and 
manufacturer, and how they responded. The 
most interesting ones will be published; all of 
your examples will be read with interest. 

We won't be able to change the computer 
world overnight. But maybe this column can do 
a small bit to make this economy safe for com- 
puter hobbiests. 



fi 
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REVIEW: ntBBLES flWfW 

of 
another 




copier 



by Karen Fitzpatrick 



In my first review (Premier is- 
sue) I should have made it clear 
that Sensible Software's BACK-IT 
UP is a single copy package... 
and I should have included their 
ratings as a single product and 
not two different ones. 

I have not yet received the up- 
dated COPY II Plus, but I have 
received the new Locksmith and 
the new Back-It-Up. . . unfortu- 
nately, I haven't received the 
necessary data on their use of 
PARAMETERS which plays an impor- 
tant part in the effective use 
of both programs. 

So 

Mext Time 

WHAT THE HECK IS A PARAMETER? 

Your feedback will be greatly 
appreciated and very helpful. 
If you have a recent list of the 
Locksmith or the Back-It-Up par- 
ameters, please send it to me! 

And, ofcourse, if you have a gen- 
eral bit-copy program and would 
like to have it reviewed, send 
a copy to me (the original only) 
along with documentation and a 
phone number that you can be 
reached at when I have questions. 

Thanks, 

Karen Fitzpatrick 



Here is a bit-copier that I missed in my 
first review. Since it was available at the 
same time as the other three {Locksmith 
3.1, Back-tt-Up and Copy II Plus), I will 
compare it to them rather than the newer 
versions. The name of this bit-copier is 
Nibbles Away. It is sold by Micro-Ware 
Distributing Inc. for $59. 

Nibbles Away boots on 13 or 16 sector 
Apple M's and supports single or dual drive 
copy with single controller. The user 
selectable options include: 

1. Selectable start and end tracks 

2. Automatic half-tracks 

3. Syncronized copy 

4. Raw data copy 

5. Erase destination tracks 

6. Reduced error checking 

In addition to these options are the 
following features that set it apart from 
other bit copiers: 

1. User-accessible nibbler 

2. User defined parameter change 

3. System filer (to save parameter 
changes) 

The nibbler allows you to look at 
encoded bytes on the disk in order to 
determine what parameter changes to 
make. After changing the parameters, you 
may save them with the system filer to a 
data disk for future use. 

Reliability 

Reliability: With the parameter change 
function, this program was able to copy 
every disk 1 tested including a few that 
Locksmith 3,1 could not. The default value 
for the sync byte was $FE which matched 
the changes on many protected disks that 
were copied with this program.) 

Ease of use 

Ease-of-use: The prompts are clear and 
easy to understand with default values 
used extensively. The ESC key will halt 
execution of the program and return you to 
the menu. 

Amount of displayed information 

Amount of Information given during disk 
copy: Nibbles Away gives the most 
information of any bit-copier 1 have tested. 
The screen display is dynamic and all 
information is clear and easy to under- 
stand. The program will inform you what it 



is reading, analyzing, writing or verifying. 
It will tell you the type of errors 
encountered and keep a running total of 
each. The count is displayed next to the 
track number along with an inverse Y or N 
which tells if the track was copied or not. 

Documentation 

Documentation: The documentation Is 
excellent. The operation of a bit-copier is 
explained and each function of the 
program is explored with examples of how 
to use them. You are shown how to use 
the nibbler and what to look for on a 
protected disk. Then you are shown how 
to use this information to change the 
parameters in the program. Finally, you 
are shown how to store these parameter 
changes on a data disk for use at a later 
date. 

Speed 

Speed of Copy: The program takes 
about 4 minutes to copy a disk, longer if it 
encounters many errors. It seems that 
none of the reliable bit copiers are very 
fast. Personally, I am more interested in a 
good copy than in blinding speed. 



a note... 

I was also going to review Locksmith 4.0 
and Back-It-Up II. These are the much 
talked about NEW bit-copiers. They are 
definitely better than the old versions but 
they are also user-intensive. By user- 
intensive, I mean that they require more 
input from the user in the way of parameter 
changes. Unfortunately, these parameters 
are not well documented and in some 
cases are not even mentioned. 

Rather than review these new copiers, I 
am working on obtaining the information 
needed to understand the parameter 
changes and what to look for on a 
protected disk in order to select the correct 
parameter to change. The article will be 
ready soon and will contain the following; 

A. Parameter numbers and values 

B. What each parameter does or 
defines) 

C. How to use each parameter 

The article will also review Locksmith 
4.0 and Back-It-Up II in a side by side 
comparison. 
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PLAIN TALK ABOUT "COPY PROTECTION" 



A lot has been said and written about copy protection and 
software piracy since Omega made Locksmith available to 
Apple II users earlier this year. We have been accused of 
encouraging illegal copying of copyrighted software. 
Software publishers have threatened to boycott magazines 
which carry our advertising, and the pros and cons of 
Locksmith and copy protection devices have been debated 
in Apple forums throughout the country. But, we at Omega 
haven't really told you, the Apple user, our side of the story. 



On December 12, 1980, a change was made to the 
Copyright Act which resolved these questions. It is now the 
law of the United States that the existence of a copyright 
notice on a computer program does NOT make it illegal for 
the legitimate owner of that program to copy it for archival 
purposes. Backups are now clearly legal. (Of course, when 
you sell your purchased program, you must destroy the 
backups you have made). Only after such use clearly 
became legal did we decide to sell Locksmith. 



Locksmith was originally developed as an intellectual 
exercise by an Apple user over a year ago. And we suspect 
that sufficient information about the Apple DOS and the 
way information is stored on a disk has been long available 
to the general public, so that ANYONE who was REALLY 
interested, and who wished to spend a LOT of time, could 
have written a program that does many of the things that 
Locksmith does. Similarly, there is really no "secret" to 
writing data base programs, adventure programs, or even 
spread sheet programs. The literature is there if you want to 
look for it. But it takes a lot of hard work to develop any 
software package that works in all cases, that is crashproof, 
that interfaces easily with a non-experienced computer 
user, and that is well documented. A LOT of hard work. 

But even before Locksmith was available to us, we, as Apple 
users, recognized a definite problem with the software we 
were buying and using. Much of it worked well. But it was 
very aggravating to not be able to make a backup copy of 
certain "copy protected" programs. Most software 
pubishers didn't supply backups of their programs, and 
those that had any policy required signing opressive 
agreements or paying questionably high yearly fees for 
presumed, but not guaranteed, updates. Among those who 
did not offer back-up was one who 'sold' us a new copy 
(when we returned our crashed disk). Although they 
advertised the importance of having their program running 
every day, they made us wait up to 6 weeks to get the 
replacement. Most vendors just ignored the problem. We, 
as consumers, were simply taken advantage of. In many 
cases we relied so much on a particular program, that it 
became very costly to have to wait weeks or more to 
replace a blown disk. Software publishers were just not 
responsive to the users problems caused by "copy 
protection". 



When we first became aware of Locksmith, we investigated 
the state of the law, and discovered that no one knew 
whether the owner of a program could copy it for backup. 
And for quite a while we debated whether we should market 
Locksmith. 



Now with the new copyright law, which for the first time 
gave software publishers clear rights that were enforceable 
in court, but which also gave "backup" rights to software 
purchasers, and with the demonstration that Locksmith 
could and would provide back-up for the user, we assumed 
that software publishers would drop their copy protection 
schemes and educate the public as to their rights and 
responsibilities. Even the use of hardware protection that 
gives copy-ability to the software would be acceptable. 
Unfortunately, their response has been to pressure 
magazine publishers into refusing our advertising, and to 
invent new copy protection schemes. 

Well, the word about Locksmith was impossible to stop. We 
couldn't advertise, but we have sold a gratifyingly large 
number of programs. As to new copy protection schemes, 
the new Locksmith {version 4.0) will adjust to them, and 
copy virtually anything protected that way. But please. For 
us, for yourselves, and for the entire industry, use 
Locksmith only for its intended legal purposes. 

The new version is more than just the best copy program 
available. There are also four additional utilities included. A 
disk speed program, a degauasser, a nibble editor and a 
media surface analyzer are included. And we stand behind 
our products. Our customer service department is available 
(and anxious) to help with problems. 

Locksmith 4.0 is available from us, or your local dealer. Visa 
and Mastercard users call Toll Free 1-800-835-2246. Kansas 
residents call 1-800-362-2421 or send $99.95. (Registered 
owners of prior versions can obtain an update for only $20. 
If you haven't received a letter from us, please call.) 

Another Quality Product from 
Omega MicroWare, Inc. 

(formerly Omega Software 
Products, Inc.) 
222 So. Riverside Plaza 
Chicago, IL 60606 
Phone 312-648-1944 




®1981 Omega MicroWare, Inc. 

Apple is a registered trademark of Apple Computer, Inc. 
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USING 

BOTH 

SIDES 

OF 

YOUR 

DISKETTES 

by 
karera 

fitzpatrick 



DOUBLE 
your 

DISKETTES 

The only reasons your Apple ][ 
cannot use the back side of your 
diskette are: 

1. There is no notch 

2. The diskette manufacturer did 
not test the back side, or worse, 
put the flawed front to the back. 

A nibbling toot will solve problem 
number 1. 

DISK PREP will solve problem 
number 2. 

DISK PREP formats and tests your 
disk Sectors with flaws are left so 
that they cannot be used. Your disk 
is left ready to boot, complete with a 
flaw report program saved on it 

$25.00 

sympathetic software 

9531 Telhan Drive 

Huntington Beach, CA 92646 

California residents add 
$1.50 sales tax 

Dealer inquiries invited 



a review of 2 programs that will 
CHECK FOR FLAWS 



At some point in time, every computerist 
has considered the possibility of using the back 
side of their disks. The lack of a write protect 
notch is a hinderance that can be solved with a 
common paper hole punch. Some enterprising 
computerists have even defeated the write pro- 
tect switch in the disk drive. The real problem is 
how to determine whether the flip side has any 



flaws. There are two programs that will scan a 
disk for flaws and change the disk map so that 
these areas are not used by DOS: 

1. Disk Prep, by Sympathetic Software 
025). 

2. Disk Recovery ("the Scanner"), by Sen- 
sible Software, Inc. ($30). 



The SCflnnER 



DISK RECOVERY "THE SCANNER" can be 
used on 13 or 16 sector systems with 4SK 
memory, and can be configured for a language 
card. 

Documentation 

The documentation for The Scanner is clear 
and easy to understand. It explains the different 
functions that are possible with the program. 
There is a section of "Special Notes" that gives 
a brief explanation of some of the properties of 
The Scanner program 

Screen Lay-out 

The Scanner has an excellent screen lay-out 
that includes a continuous readout of the sec- 
tors being scanned. There is a "report" of the 
bad sectors, files deleted, number of errors 
found, number of mismarked sectors, and 
number of free sectors. When The Scanner is 
scanning and comes upon a bad sector, the 
readout stops and the track and sector is 
printed in inverse on the screen Then the scan 
continues. The Scanner uses a default entry 
system 

16 Sector 

Before using The Scanner, you must first 
configure it for your DOS or language card. This 
takes about 5 seconds and is a one-time re- 
quirement unless you change the DOS. The pro- 
gram will only scan a previously INITialized 
disk. It takes about 20 seconds to do a complete 



scan (a little longer if it discovers any bad sec- 
tors) and 35 more seconds if you INITialize it 
first. After scanning a disk the program will ask 
you if you want to rebuild the VTOC. If there is a 
bad sector in one of your files, you will be given 
the option of deleting the file. 

13 Sector 

Before using The Scanner on a 13 sector 
system, you must first configure it for 13 sector 
DOS When you run The Scanner on a 13 sector 
disk it will automatically rebuild the VTOC. This 
is due to the way 13 sector DOS (NITializes a 
disk You are informed to ignore errors on track 
0, sector A and track 2, sectors 9 thru C. These 
errors occur either on a newly INITialized disk 
or if Update 16 has been run on the disk. When 
finished with the scan, the program will ask you 
if you want to rebuild VTOC It takes The Scan- 
ner 1 minute to rebuild the VTOC and scan a 
disk (INITialization takes about 2 minutes). 

Extras 

The Scanner does not INITialize a disk 
when it scans for. flaws. This means that it can 
be used on disks that already have files. In addi- 
tion to scanning a disk for flaws, the program 
will rebuild the VTOC using the directory and 
display a map of the used and unused sectors. 
When rebuilding the VTOC, the Scanner will 
display the file names (control characters in 
inverse) and the sectors used by that fite. 



DISK PREP 



DISK PREPrunson both 13 and 16 sector 
systems with 32k or 48k memory. (The disk has 
a 16 sector program on the front and 13 sector 
on the back.) The program will INITialize a disk, 
scan for flaws and open a "Bad Sector File". 

Documentation 

Documentation for Disk Prep is included on 
the disk. It is very clear and concise. The in- 
structions are easy to follow and there are 
explanations of the possible drive and I/O er- 
rors that may occur. There is also a good argu- 
ment for and against putting DOS on your disk, 
and directions for prepping the back of your 
disks. The documentation is the same for both 
the 13 and 16 sector sides. 

Screen Lay-out 
The format for Disk Prep is good. It 
prompts you to insert your disk and select a 
volume number (j thru 255) and uses a default 
entry system You will be asked if you wish to 
have DOS put on the disk. If you select this op- 



tion, you will then be asKea to enter the name or 
your greeting program. When DOS is put on 
your disk, the bad sector report will be SAVEd 
to the disk using your greeting program name. 
If you choose not to put DOS on your disk, the 
program will automatically start a file called 
"Bad Sector Report". 

16 Sector 

The program takes about 3 minutes and 40 
seconds to INITialize and scan a 16 sector disk. 
Adding DOS takes an additional 20 seconds. 

i3 Sector 

It takes 3 minutes to INITialize and scan a 
13 sector disk and 18 seconds to add DOS. 

Extras 

Disk Prep INiTializesas tt scans, saving the 
user one extra step. 
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SENSIBLE SOFTWARE, INC 

The utility People 

Making Ll#e with the Apple II A Bit Easier 



DISK RECOVERY 
THE SCANNER" 

48K + , Disk II 

Apple 11/ Apple n + 

$30.00 

Are you plagued with disk I/O errors? 

Does the integrity and safety of your 
data concern you? 

This program is a must for all 
Disk II owners!! 



Just as "Apple Pascal" provides a "BAD BLOCK SCAM". DISK RECOVERY will do a 
complete scan of your diskettes' recording surfaces. Damaged areas will be 
"marked" as used in the disk directory so that no attempts will be made to 
"WRITE" to a bad sector. The VTOC is completely rebuilt to accurately reflect 
BAD, USED, and FREE SECTORS, further insuring the integrity of the diskette. A 
complete report is generated advising the user of all corrections BEFORE the ob- 
ject disk is altered. A resulting "DISK MAP" is presented for your review. Flexibili- 
ty of the program allows evaluation of NEWLY INITIALIZED DISKETTES as well as 
DISKETTES THAT ALREADY CONTAIN PROGRAMS AND/OR DATA! The SPEED of 
analysis is unsurpassed - only 18 seconds for a 15 sector diskette! DISK RECOVERY 
is supplied in the revoluntionary QLiiCKLOADER format which allows easy recon- 
figuring to make it fully compatible with 13 sector and 16 sector diskettes as 
well as your SUPER-TEXT data diskettes! TREAT YOURSELF TO PEACE OF MIND 
KNOWING THAT YOUR PROGRAMS AND DATA ARE SECURE WITH.. .DISK RECOVERY. 



BACK IT UP II has been improved and enhanced to provide the end user with the 
most powerful duplication system for the Apple II computer. Numerous 
PARAMETER CHANGES are allowed to directly handle the multitude of possible 
security formats as they are encountered. Direct study of these formats is possi- 
ble with our own NIBBLE READER Both 'full tracks' and 'half tracks' may be 
analyzed individually. Preview the source disk with the QUICK SCAN option to 
readily locate pertinent data. When duplication is begun automatic half- 
TRACKINC is readily enabled. A powerful SYNCHRONIZATION MODE has been add- 
ed to the BACK IT UP II system. The MEND TRACK function manipulates data 
from designated tracks that are otherwise irretrievable with other programs. 
The end user is kept WELL INFORMED of the progress and any problems en- 
countered once duplication has commenced. As with all SENSIBLE SOFTWARE 
products BACK IT UP II is extremely easy to use - USER FRIENDLINESS is more evi- 
dent than ever before. The documentation has been expanded to a TUTORIAL 
ON DISKETTE FORMATTING as well as an easy to read USER GUIDE. 

The availability of this program in no way implies that SENSIBLE SOFTWARE. INC. 
supports software piracy and is intended for the sole use of the computenst 
who wishes to 'back-up' his/her diskette library Although itself uncopyable by 
itself. SENSIBLE SOFTWARE, INC. does have a very liberal S5.00 disk up- 
date/replacement policy. 



BACK IT UP II 

48K + , Disk II 

Apple il/ Apple ll + 
$60.00 



WE LISTED TO THE APPLE USERS! 
WE LISTENED TO THE REVIEWERS! 

NEW! IMPROVED! 

NOW EVEN BETTER THAN BEFORE! 



tl 




SENSIBLE SOFTWARE, INC. 

6619 Perham Drive Dept H 

West Bloomfield. Michigan 48033 

313-399-8877 

Visa and Mastercard welcome 

Please add S1.25 postage and handling per disk 



P 
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How now? What's news with you? 

I have received several requests for clues and maps, but have received 
only a few reader-contributed clues. Many thanks to those who sent me maps 
and notes 

At this time I wish to re-emphasize the basis upon which this column is 
built: USER SUPPORT. Without it, this column will cease to exist and I will be 
back on the bread line. So, to make a short story long, get those ckjes in the 
mail! ! If you have only made a small degree of progress in a game, send in 
what you know so far. Remember: EVERY CLUE HELPS. 



Now, for soma adventure tips! 
This quarter I will give some tips an OO-TOPOS and ULTIMA: 

D0-T0P08: 

Once you have gotten out of your cell [the "North" command should help out 
here], you should come upon an abandoned guard cell. Get the food and pro- 
ceed East. This way you will have a laser at your disposal. Bear in mind that 
this adventure is like no other, so most of your regular tactics will not work. 

ULTIMA: 

I have had the best luck in the old days by being a thief. In fact, I managed 
to steal a phaser in mideaval times! The only other reel valid clue is: Get as 
much information out of the bartenders as you can. if buying a drink doesn't 
loosen his tongue, keep buying! ! 

This issue I will give a short review of e series of adventures 
known as "EAMON". 

EAMON is a very unique series of adventure games in that you start out 
with what is known as the "EAMON MASTER" diskette. With this diskette, 
you can build your character, buy any needed weapons, armor, etc. After hav- 
ing accomplished this, you can go on your first adventure! 

In order to go on an adventure, you must-have a separate game disk with 
one of the many EAMON adventures on it. However, on the master game 
disk is the simplest of ail the EAMON games. This is the "BEGINNER'S 
CAVE". It is recommended that you try this game out first in order to build 
your character's strengths so as to be better able to negotiate some of the 
harder games. 

One of the nicest things about EAMON is the fact that the disks are not 
protected so you can make any modifications yourself. The author states in 
each of his game disks that he encourages non-commercial distribution. In 
other words, you can trade or give away EAMON disks to your heart's 
content. 

I would like to point out that there are about ten EAMON adventures cur- 
rently available. One of these disks is known as the EAMON designer disk. 
This disk allows the user to design his own adventure scenerio. The format of 
this disk, and the manner in which it allows you to design your game, is 
excellent. 

For more information, write to: 

Donald Brown 

407 Peery Parkway 

Golden, Co. 80401 



So, until next time, when we ask the question "Who is ZORK?" . . .keep 

adventuring I 

Mike Flynn 
c/o HARDCORE 
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Although we sometimes answer questions asked in letters directed to staff members, we usu- 
ally don't have the time. However, we will answer those important questions in this column. 

Because many of our readers have asked the same questions (in different words), we have ga- 
thered them together here, with their answers, without crediting their authors. 

some problems with demuf f in & surgery... 




U Are there any programs Demuffin 
will work on? 

A Demuffin will only work if the RWTS in 
the DOS used by the disk has not been ex- 
tensively modified. 

U Several programs in V.l, No.l 
require Applesoft and an Integer 
Card. Will any other language 
cards work as a substitute for the 
Integer Card? 

M In order to use Demuffin Plus you must 
be able to get into the monitor when you 
press RESET. The old monitor ROM on the 
Integer Card allows this. The new Auto- 
start ROM does not. A RAH Card which has 
a switch to select the RAH or on-board 
ROMs will sometimes work. Load Integer 
first, wri te-protect the card, then BOOT 
the protected disk. Use the switch to 
select the RAM Card. When you press RESET 
you should be in the monitor. If not, then 
your card won't work. 

U How can I use the open-heart 
surgery method to get Binary and 
Text files off a disk? 

A First see the article on using Muffinl3. 
If this doesn't work then follow steps 1 
thru 9 of open-heart surgery in order to 
reconnect the DOS. BLOAD the Binary file, 
then press RESET to disconnect DOS. Look at 
location $AA72, $AA73 for the start of the 
file and location $AA60, $AA61 for the 
length. (Hex adresses are standard LO-Byte, 
HI-Byte format) SAVE the file to tape or 
BOOT a slave disk and 6SAVE. BOOTing a 
slave disk will only overwrite page 3 ($300- 
$3FE) and page 8 ($800-$8FF). If the Binary 
file resides in these areas, use the monitor 
move command to move it to a safe location. 
Hove the binary code back before you BSAVF. 
it. 

For Text files, you must write a short pro- 
gram that OPENs the file then GETs the 
information a byte at a time. I usually 
send the information to a printer as I GET 
it, but you could also store each byte in 
memory. BOOT a slave disk and recover the 
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information. (Remember not to use page 3 
or 8.) 

U I have an Apple 11+ 48K- single 
disk with Integer Card and 3,3 DOS, 
and have been unable to get Demuffin 
Plus to work. 

f\ A number of people are having problems 
with Demuffin Plus. Before you start, 
insure the following: 

1) That you have the Programmers Aid ROM. 
(Either resident in the Integer Firmware 
Card or loaded into your language card. 

2) That you are in Integer language. (Type 
INT and press RETURN) The Integer ROMs 
must be enabled before you call the Pro- 
grammers Aid ROM, Calling the Programmers 
Aid ROM while in Applesoft will only result 
in calling the Applesoft Interpreter with 
unpredictable results. 

If you have the Programmers Aid ROM and are 
in Integer and the steps still do not work, 
then stop, go to your dealer and get a more 
recent copy of Muffin. We have found that 
some of the early copies of Muffin will not 
work with the Demuffin Plus procedure., 

U How can you defeat a reset 
vector change? 

A With the Autostart ROM in control it is 
not possible. However, the Integer F-8 
ROM does not use the reset vector and is 
the only way I know of defeating the vector 
change. 

U I have a largo number of disks 
wi th the volume #2 54-. How can I 
change these volume numbers to be 
in consecutive order? 

M A lot of us have disks with a volume 
number of 254. This is the default value 
used by DOS whenever you INITialize a disk 
and do not specify a volume number. The 
disk Volume number is part of every sector 
address mark. The only way to change this 
is to INITialize a new disk with the Vol - 
ume number you wish, and then transfer all 
files to that disk. 
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Customizable Nlodu 



In part 1 (published in Update 1.1), I introduced my version of the Customizable Modular combination Ad venture- Arcade Game, a disk-based game in 
modular format so that the user could change, add or remove modules and thus create a unique version. In this installment I will reveal the first maze 
module used to create the topography through which the adventurer must travel. 

It is called the Mountainous Island Maze-maker which is graphically presented in a novel way: as a relief or 3-D map. Other maze modules will be 
presented later as this series continues Parts 3 and 4 will be published in Updates 2.1 and 2 2, and part 5 will appear in issue No 3 I welcome vour 
responses to my efforts. 

part 2 INTRODUCING THE "MAZE" CONCEPTS 



All adventures in role-playing computer games take place in what I 
call "the MAZE". This all-inclusive term is also used here to describe the 
unknown quality of places you must travel through as the adventure 
progresses. The mysterious elements of the "maze" can be revealed to 
the player in a number of ways, the most common being regular TEXT. 

But Apple-adventuring has come a long way since the all-TEXT ver- 
sions. Many now display the "maze" in a number of ways. Some have 
flat but colorful maps of islands, forests, rooms, caverns. Some even 
create the illusion of 3-D depth by PLOTing the rooms in perspective. 
Some have hires pictures that are loaded from disk at opportune 
moments. 

Maze Detail & Complexity 

Mazes can be simple to elaborate. The more complex it is, the more 
details must be stored that can be called up to describe it for the in- 
trepid voyager. Data for the maze can be stored in the program itself as 
DATA statements to be READ when needed; but this method severely 
limits the detail that a good adventure must have. Data for the maze can 
be stored in memory as variables (usually string arrays) or it can be cod- 
ed and stored in memory as actual bytes. One can also store maze data 
on disks to be loaded when needed. I prefer a combination of all these 
methods. 

What is maze detail? Simple adventures just tell you that to the 
West is a wall. More maze detail would include: a crack in the wall, or a 
blood stain near the top. Even more detail would let the program deter- 
mine whether the adventurer could destroy the wall, or dig a hole 
through it, or take a stone from it, or hide some coins in it, and so on. 
The greater the detail, the more complex and realistic the role-playing 
becomes. 

Maze Scale & Quantity 

Maze detail and maze scale are inversely related because of data 
storage restrictions (whether on disk or in the computer). The larger 
the scale and complexity of the maze, the more storage it will require 
and the less detail can be stored about each element of the maze. Of 

course, in many instances great detail is not necessary (as in moving 
from one rendezvous to another across a map) but there are moments 
when enormous detail must be immediately available to maintain the 
adventure's fantasy world-view. 

1 have broken down the scale/detail spectrum into three general 
categories which will become useful later in this article- 

1. ROOM BY ROOM 

This category requires a great amount of detail for it is at this small 
scale that battles should be fought, and essential objects gained and 
lost. This is the greatest detail and the smallest scale 

2 SPECIFIC TOPOGRAPHY 

An example is movement through a city or forest, where the detail 
is less important (but not irrelevant) and movement is stressed. The 
adventurer is in transit, looking for that Room-by-room action. This is 
medial in detail and scale. 

3. GENERAL TOPOGRAPHY 

Here, detail can be almost missing since the emphasis is on motion 
from one "event" to another, from town to town, from cave to castle, etc. 
Here, detail is minimal, and the scale is very large. Enormous maps, 
spanning entire disks, would fall into this category. 



The Concept of "a Room 



Let me explain what I mean by a "room" Motion through a mare of 
any scale is usually by discrete units that I call "rooms". It is the detail of 
these rooms that I am referring to when I speak of maze detail. 

Maze data is stared differently for these three general levels of 
detail /scale. 



In General Topography, the scale can be enormous because usually 
only one byte of storage is used to describe each "room". 256 different 
"rooms" are thus available, and these rooms are usually graphically 
displayed by using a character -generator link, substituting a graphic set 
in place of the letter or character and PRINTing it on the Hi-res Page. 
Large maps can thus be displayed and then scrolled up or down, left or 
right. One can also code the byte differently and display a different kind 
of map. It is this route that I have taken in my Relief Mapping technique. 

In Specific Topography, the scale is medium because more than one 
byte is used to describe each room. This allows more detail as a greater 
number of bytes are used. Generally, though, normal strings and data 
statements are used. Most adventure games fall into this category. 
Usually very little disk access is necessary except to display some hi-res 
graphics. 

In Room-by room Topography, only data for just a few rooms can be 
stored in memory at any one time and the game must access the disk 
often as the player moves from room to room. The greatest amount of 
detail can be revealed when using this method. 

I think that a good adventure should range throughout this spec- 
trum of scale and detail, and our modular adventures will do so by hav- 
ing a module for each of the three detail-scale levels. 

Relief (3-D) Mapping 

Drawing a map in simulated 3-D is difficult at best, and a frustrating 
failure at worst. 

The Isiand Maze-maker is a compromise 1 worked out between the 
need for visual clarity and the scale of each "room". As you can see from 
the illustration, the islands appear to be three dimensional because of 
the way we have learned to translate occlusion and elevation cues. 

The actual grid is 20 by 20 points, with all 400 points (rooms) stored 
as bytes on TEXT page 2. The program itself loads above Hi-res Page 1 
and PLOTs on this page. 

It is not a long program, and it is not a polished product. I present it 
here because it is a stepping-off point to a number of different maze 
possibilities. You need not limit yourself to an isfand. You can have a 
much larger number of rooms, but you'll have to show only segments of 
the map at any one time or the screen wilt blur the elevations points 
together, making the map unreadable. Besides the mountains, you can 
have lakes, rivers, volcanoes. 

Each byte can have a value of througn zss. I have coded this byte 
in two ways: 

1 . The X and Y map coordinates are stored in the byte's actual posi- 
tion in memory {lines 300 and 310) 

Since the map is 20 by 20, one can derive the X and Y positions by 
dividing by 20(X%)and subtracting it from its position in memory (Y56), 
The actual screen position is calculated in lines 370, 380. 

2. The elevation and site data is stored in the byte value itself (lines 
350, 360). 

Elevation values can be from to 12. It is stored in the byte as the 
"tens" and "hundreds" place marker (place 10). 

Site values are from to 9 (for elevations above 9, only site values of 
to 5 are valid) and are stored as the "ones" place marker. 

The mountains are created by: 

1. Selecting a position in memory (ZT1P%) that is on the map (line 
1110) and 

2. Giving it an elevation from 8 to 12 (line 1120). 

3. Giving each of its sides its own slope from 1 to 3 (line 1000). 

4. Going in concentric squares clockwise around this pinacle (lines 
1200-1410) and 
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5. Examining the elevation on tts right (ZMEM%: the elevation 
closer to the peak) and 

6 Choosing a lower elevation depending on a random factor and the 
slope for that side of the mountain (lines 200-240). 

7. If it is higher than the actual elevation at that point then it will 
change that elevation (line 1450). 

8. Plot the point and draw lines to the elevations in all 4 directions 
except if that point is not on the map (lines 2000-2090) 

9. Do this for a few mountains (line 1100) and 

10. Clear the screen and redraw the entire island (lines 2000-20090) 

I've written this version so that it PLOTs the high peaks (higher than 
9) in white to simulate snow-capped tops. 

This technique has tremendous possibilities. By storing the actual 
screen X and Y positions elsewhere in memory, one can make it PLOT a 
saved (previously plotted island) isle rather quickly so that one can move 
from isle to isle. 

By calculating and saving the island X, Y coordinates elsewhere, one 
can make the island turn around in 3-D style as you fly around it or over 
it. 

The possibilities are exciting and I hope that with this rough Maze- 
Module you can create unique graphic presentations for later incorpora- 
tion into your own adventure games (whether it is part of this modular 
series or simply your own independent game). 

next time: Site Characteristics 

Next time I will have some extra lines that will let you move through 
the map and edit it as well I will also explain the concept of "site". The 
next addition to this module will also PLOT towns, castles, cave 
entrances and reveal whether the voyager is standing on water, swamp, 
grass, bare rock or earth, or is beneath poplars or pine or maples, etc 



Because this program must be loaded above 
Hi-Res page 1 (to make room for the maze data 
stored on Text page 2 and to permit plotting 
on Hi-Res page 1), you must POKE 104,64 and 
POKE 16384,0. 

OR you could RUN this Program Loader: 

1 D$=CHR$(4): POKE 104,64: POKE 16384,0 

2 PRINT Li$;»RUN MAPMAKER 1" 

Be sure to SAVE the mazemaker as, MAPMAKER 1. 



Island and Mountains nakar 

50 goto 10000 



MEMORY CHECK #1 



100 IF TMEMX < BMEMX OR TMEMX > EHEMX 
THEN POP : POP s GOTO 1500: 
REM <N0T ON MftP> 

110 RETURN t REM < OK, ON MAP > 

T MEMORY CHECK 

130 IF TMEMX < BMEMX OR TMEMX > EMEMX 

THEN POP : GOTO 2080 
140 RETURN 



MAKE ELEVATION 



200 ELEVX » INT i PEEK <ZMEMX) / I«) 
- 10 '- INT C RND CD * C5L0PEX 
<5IDE> + 1)) - 2 

210 IF ELEVX < THEN ELEMX = 
240 RETURN 

N-E-S-H SIDES 

250 TMEMX ■ PMEMX - 20 : RETURN t REM 

<NORTH> 
260 TMEMX * PMEMX + 1 s RETURN : REM 

<Efl5T> 
270 TMEMX - PMEHX + 20 s RETURN : REM 

<50UTH> 
280 TMEMX = PMEMX - 1 s RETURN I REM 

<HE5T> 
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BISBSSaSSliaBilBWSSia 52 — = 3= =3t = !S = tE 5SS5 SSS SSK = 

T MEM CALCULATION OF X, % ELEV, SITE 

308 YYX = (TMEMX - BMEMX) / 26 

316 XXX = TMEMX - BMEMX - YYX * 2* 

32* IF PEEK (TMEMX) < 188 THEN RETURN 

348 FACTX = PEEK <TMEMX) / 1* 

358 ELEVX «= FACTX - 16 

355 IF ELEVX > 8 THEN SNOW * 1 

366 SITEX « PEEK (TMEMX) - FACTX * 1* 

370 XMAPX - XXX * 10 + YYX * 3 

380 YMAPX * YYX * 5 - ELEVX + 13 

390 RETURN 



836 GOSUB 260 
850 PMEMX ? TMEMX 
890 RETURN 



PICK A DIFFERENT SLOPE FOR EACH OF 
THE 4 SIDES OF EACH MOUNTAINS 

1066 FOR SIDES # 1 TO 4 ! SLOPED 
(SIDE-IS) = RND (1) * 4 + 1 t 
NEXT SIDES 



ENS& = 33l=SS 



^£E3?; 



S SCJZSS: SSSJESS S3 =S= =tS 



NORTH SLOPE 



500 
510 
520 
525 



TMEMX * PMEMX + 1 

G05UB 100! REM <MEM CHECK> 

ZMEMX ■ TMEMX + 20 

IF WIDTH - LIMIT « 2 THEN ZMEMX 

ZMEMX - 1 
530 GOSUB 200* REM <ELEV> 
550 PMEMX * TMEMX 
590 RETURN 

EAST SLOPE 

600 TMEMX m PMEMX + 20 

610 GOSUB 160 

620 ZMEMX = TMEMX - 1 

625 IF WIDTH = LIMIT * 2 THEN ZMEMX 

ZMEMX - 20 

630 GOSUB 200 

650 PMEMX - TMEMX 

690 RETURN 



c«ss; 






SOUTH SLOPE 


700 


TMEMX = PMEMX - 1 


710 


GOSUB 100 


720 


ZMEMX - TMEMX - 26 


725 


IF WIDTH - LIMIT * 2 THEN ZMEMX = 




ZMEMX + 1 


730 


GOSUB 200 


750 


PMEMX = TMEMX 


796 


RETURN 


= !t=KSS== = === = = = = = = = = = a = = = = II - !!e!= = :=1= = e!:=1==:=! 




WEST SLOPE 


800 


TMEMX - PMEMX - 20 


816 


GOSUB 106 


826 


ZMEMX - TMEMX + 1 


825 


IF WIDTH - LIMIT * 2 THEN ZMEMX = 



1166 

1110 

1120 
U36 

1140 

1156 



MAKE MOUNTAINS 
STEP 1 SET PEAK HT. 



R% = RND (i) * 3 + 3 : FOR 

MOUNTAIN = 1 TO RX 

ZTIPX * RND <1) * 406 + BMEMX - 1 

ELEVX <= RND (1) * "& * I 

IF PEEK (ZTIPX) < 110 OR PEEK 

(ZTIPX) > 186 THEN 1110 

ELEVX * RND (1) * 5 + 8 

POKE ZTIPX, (ELEVX + 18) * 18 



1206 
1210 
1306 
1406 
1416 

1430 
1440 
1450 

1490 
1566 
1518 
1528 
1530 
1548 
1598 



STEP 2 



CALCULATE SIDES 



FOR LIMIT - i TO 5 

PMEMX * ZTIPX - 28 * LIMIT 

FOR SIDES = 1 TO 4 

FOR WIDTH - 1 TO LIMIT * 2 

ON SIDES GOSUB 586, 606, 780, 

: REM <N,E,S,W SLOPES> 

ZELEVX * (ELEVX + 18) * 10 



LIMIT 



806 



IF PEEK (PMEMX) < 

IF PEEK (PMEMX) < 

POKE PMEMX, ZELEVX 

GOSUB 2606 

NEXT WIDTH 

NEXT SIDE 

NEXT LIMIT 

NEXT MOUNTAIN 

GOSUB 20006 

END 



116 THEN 1506 
ZELEVX THEN 



PLOT, GRAPH 6 DRAW LINES 
TO NEW ELEVATION 



2660 HCOLOR- 3 

2805 TMEMX = PMEMX s G05UB 306 
2610 HPLOT XMAPX, YMAPX "■ XX =■ XMAPX 
: YX ~ YMAPX 
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J 3 of the several steps in 
island mountain making 




f one of many ways to show 
1 3-D island grid-relief map 

2420 FOR TEST - I TO 4 : ON TEST GOSUB imm fiA . BB - qb - BMEMX + 399 ! 

256, 260, 270, 269 = TEST = MAX : GAP - - 1 > FOR IN 

REM <N,E,5,H SL0PES> = flft TO BB STEP 26 P GOSUB 11049 

2939 GOSUB 139 s GOSUB 399 t NEXT IN ! REM <RIGHT EOGE> 

2049 IF ELEUX > 8 THEN SNOW * 1 19959 Aft = BB i BB * BMEMX + 389 : 

2945 IF TMEMX < 199 THEN 2989 TEST = MAX *- GAP = - 29 I FOR IN 

2959 HCOL0R= 2 ! IF SNOW > 9 THEN . fl ft TO BB 5TEP ~ 1 » GOSUB 

HCOLOR= 3 s SNOW * 9 11999 s NEXT IN i REM <BOTTOM> 

2955 IF ABS ( XX - XMAPX > > 19 THEN 1M69 ftA » BB i BB * BMEMX I GAP = 1 

2989 : TEST * MAX i FOR IN = AA TO BB 

2969 HPLOT M- h YX TO XMAPX, YMAPX STEP - 29 « GOSUB 11999 ! NEXT 

2989 NEXT TEST IN I REM <LEFT EBGE> 

2999 RETURN 19980 HGR 

19999 GOTO 1990 

INIT VARIABLES ==:==:==a! = = = : = K =^====-=-=-====-===-====== : = 

, CLEARS MEMORY AROUND ISLAND 

10990 BMEMX = 2199 = EMEMX = 2499 

10995 G* = CHR* (7):D* = CHR$ (4) iwm HE = RND U ) * MAX * 1 8 IF ABS 

19419 GR ! POKE - 16299,9 < ®% - TEST > > 2 THEN 11900 

19911 MAX * 4 11929 TEST = RX i POKE IN + (GAP * 

TEST ), 190 t FOR JJ = IN + 

== :3; = :: : i » l! =a== :: ==:======a=*================= ( GAP * TEST ') - GAP TO IN STEP 

CLEAR TEXT PAGE 2 - GAP : POKE Mi I I NEXT JJ 

TO VALUE OF 119 (ELEV OF 1> l\m<b RETURN 

19024 FOR A n BMEM% TO EMEMX I POKE A, 

119 : NEXT A DRAW ENTIRE MAP 

a = ==== K ================3===========«==— = 29900 HGR : HOME 

CREATE IRREGULAR ISLAND PERIMETER 20910 FOR 1 = BMEMX TO EMEMX 

«•* 29936 PMEMX * I 8 GOSUB 2999 

10930 A A = BMEMX ' BB ■ BMEMX + 19 : 20999 NEX1 I i RETURN 
TEST « MAX : GAP ■ 26 I FOR IN = 

AA TO BB i GOSUB 11996 : NEXT IN 2» 

! REM < TOP EDGE> wk 
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DISKLOCKS 

How To 

COPY-PROTECT 

your disks 



In the most popular column in the Premier Issue, Our 
mysterious Bobby will attempt to cover the entire topic 
of Copy- 1 protection ' techniques in upcoming installments. 

Published in slightly different form in Update 1.1, 
this expanded DiskLocks now includes 3.2 information as 
well. The tables have been updated. Information you 
garner from this article and the SOFTKEY II should be 
used along with UiskEdit and DiskView, Chuck Haight's 
pet programs. Future articles will assume that you al- 
ready have these soft-tools at your disposal. 



Copy protection can be loosely divided into 
4 methods. 

1. copy-protected disks 

2. software protection 

3. hardware protection 

4. memory protection 

I say "loosely" because each area overlaps 
the others. Method 1 usually involves changing 
the format of information on a disk. The disk is 
not copyable by normal means. In method 2 the 
program goes bach to the disk and searches fpr 
a particular pattern. The disk is seemingly 
copyable but bombs alter the program is run. 
And in method 3 a card or other hardware is us- 
ed by the program. The disk is copyable but re- 
quires the hardware to run. Method 4 is really a 
subgroup and is employed by the other three 
protection schemes. It includes such things as: 
locking-out the reset and contro 1 "C", 

The number of ways that a program can be 
protected has yet to be counted. Sine com- 
panies even use other computers to dt ise disk 
formats that cannot be duplicated by the Aople. 

In this article we will look at method one: 
Protecting your prof am by altering the disk 
format. In order to understand these changed 
formats you need to fi st look at a normal disk. 



The flexible (or floppy) diskette can be 
thought of as a disc-shaped piece of recording 
tape, and essentially that's all it is. The reason 
for the flat disc shape as opposed to using a flat 
strip (as in a tape) is for speed of information 
retrieval. For instance, if you were to have a 
program stored in the middle of a tape, the com- 
puter would have to READ in all of the tape 
preceding the area where your program 
resides. This method of information retrieval is 
known as "sequential access". The disk, on the 
other hand, is set up in such a way that the com- 
puter can go directly to a piece of data or pro- 
gram by scanning the disk laterally. This 
method of information retrieval is known as 
"random access". 

When a disk is INITialized the Disk 
Operating System (DOS) divides it into 35 con- 
centric tracks (see figure 1). DOS 3 3 then 
divides each track into 16 blocks called "sec- 
tors". DOS 3.2 creates 13 "sectors". Each sec- 
tor contains an address mark and a data mark. 
These marks are a unique set of bytes that are 
used by DOS like street signs. 

The address mark tells the DOS what 
track/sector it is currently READing. It contains 
the volume, track, sector and checksum infor- 
mation. The data mark surrounds the actual 



data. It tells the DOS where the data begins 
and ends and contains a checksum that is used 
to verify the accuracy of the data. 

If you have ever tried to LOAD a program, 
and the disk drive started making a slight chat- 
ter, chances are that the DOS could not READ 
one of these markers. It then recalibrates the 
READ/WRITE head by moving it back to track 
zero and stepping (counting each track that it 
passes over) back out to where it was supposed 
to be. 

The tracks are numbered from $00 (0) to 
$22 (34) and the sectors from $00 (0) to $0F 
(15). Track $00 thru track $02 (a total of three 
tracks; zero, one and two) contain the DOS pro- 
gram. 

The DOS gives the Apple the ability to 
manipulate data on a diskette. In this program 
are all of the commands related to controlling 
the dtsk drive (i.e.: CATALOG, 1NIT, LOAD...) 
and a set of ERROR messages which, unless 
you are either a magician or don't use the Disk 
II, you have probably seen before. 

The disk controller card that connects the 
Disk II to the Apple also has a small program on 
it. When you BOOT a disk, this program tells 
the Disk II to READ track $00 (0), sector $00 
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LEGAL BYTES 



HEX 


DEC 


HEX 


BEC 


— __ 


13 


Sector 


— .— 


M 


270 


AB 


nx 


AD 


173 


AE 


174 


AF 


175 


B5 


181 


m 


102 


B7 


183 


BA 


186 


BB 


187 


BB 


189 


BE 


190 


BF 


191 


D5 


213 


D6 


214 


D7 


215 


DA 


218 


BB 


219 


W 


221 


BE 


222 


BF 


223 


EA 


234 


EB 


235 


EB 


237 


EE 


238 


EF 


239 


F5 


245 


F6 


246 


F7 


247 


FA 


250 


m 


251 


FD 


253 


FE 


254 


IFF 


255 


™_„™ 


16 


Sector 


— — - 


96 


150 


D5 


223 


97 


151 


M 


214 


m 


X3<] 


m 


225 


@B 


155 


m 


217 


9D 


157 


DA 


218 


9E 


158 


BB 


219 


9F 


159 


DC 


220 


A6 


166 


DD 


221 


A7 


167 


DE 


222 


AA 


170 


DF 


223 


AB 


171 


E5 


229 


AC 


172 


E6 


230 


AB 


173 


E7 


231 


AE 


174 


E9 


233 


AF 


175 


EA 


234 


S3 


178 


EB 


235 


B3 


179 


EC 


236 


34 


180 


EB 


237 


B5 


181 


EE 


238 


B6 


182 


EF 


239 


B7 


183 


F2 


242 


B9 


185 


F3 


243 


BA 


186 


F4 


244 


BB 


187 


F5 


245 


BC 


188 


F6 


246 


BB 


189 


F7 


247 


BE 


190 


F9 


249 


BF 


191 


FA 


250 



CB 203 

CD 205 

CE 206 

CF 207 

B3 211 



FB 251 

FC 252 

FB 253 

FE 254 

FF 255 
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jO-tOXT! 



XM'It'^^O^^HS^BfcJWUfcrMBt^om 


DOS ADDRESS AND DATA MARK WCATJONS 


m 


DOS 3.2 


READ LOCATIONS 


WRITE 


WCATIOh 




-HEX- 




-DECIMAL- 


-HEX- 




-DECIMAL- 


START OF 


B976 


D5 


47478 


213 


3EF5 


D5 


48885 


213 ; 


) ADDRESS 


B980 


AA 


47488 


170 


BEFA 


AA 


48890 


170 


) 

! 

END OF 


B98B 


B5 


47499 


181 


BEFF 


B5 


48895 


181 

222 i 


B9B2 


DE 


47538 


222 


BF29 


DE 


48937 


1 ADDRESS 


B9BC 


AA 


47548 


170 


BF2E 


M 


48942 


170 ; 


} START OF 


B908 


Bb 


47368 


213 


B893 


B5 


47351 


213 


DATA 


B912 


AA 


47378 


170 


B898 


AA 


47256 


170 




B91D 


AD 


47389 


173 


B89B 


AD 


47261 


173 


END OF DATA 


B956 


DE 


47446 


222 


B8DE 


DE 


47326 


222 

170 




B960 


AA 


47456 


170 


S8E3 


AA 


47331 


SYNC BYTE used during 


INITialization 




3F38 


FF 


SYNC BYTE written 


before the Address Mark 


BF73 


FF 


SYNC BYTE written 


before the 


Data Mark 




B87E 


FF 


] 

DOS 3.3 


READ LOCATIONS 


WRITE LOCATIONS 


\ 

START OF 


'HEX 


- 


-DECIMAL- 


-HEX 


- 


-BECIMAL- 


B955 


D5 


47445 


213 


BC7A 


D5 


48250 


213 


ADDRESS 


B95F 


AA 


47455 


170 


BC7F 


AA 


48255 


170 




B96A 


96 


47466 


150 


BC84 


96 


48260 


150 


END OF 


B991 


DE 


47505 


222 


3CAE 


DE 


48302 


222 


ADDRESS 


S99B 


AA 


47515 


170 


BCB3 


AA 


48307 


170 


START OF 


B8E7 


D5 


47335 


213 


B853 


D5 


47187 


213 
170 
173 


DATA 


B8F1 


AA 


47345 


170 


B858 


AA 


47192 




B8FC 


AD 


47356 


173 


B85D 


AD 


47197 


END OF DATA 


3935 


DE 


47423 


222 


B89E 


DE 


47262 


222 




B93F 


AA 


47423 


170 


B8A3 


AA 


47267 


170 


SYNC BYTE written 


before the 


Address Mark 


BC60 


FF 


SYNC BYTE written 


before the 


Beta Mark 




B83E 


FF 
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(0) (remember, we start counting at zero in- 
stead of one) into memory. The program on 
track $00, sector $00 contains the information 
required to READ in sectors $00 thru $09 on 
track $00. The program on sectors S00-S09 
REAOs in the remaining information on track 
$00-$02. Thus the Apple LOADs the DOS. 

At this point DOS takes over and RUNs the 
program you have INITialized the disk with 

in order to find your HELLO program DOS 
goes to the Volume Table of Contents (VTOC) 
and Directory located on track $11 (17). The 
VTOC or "bit map" shows which sectors are in 
use and which are free. The Directory begins on 
sector $0F (15) and continues down to sector 
$01 (1). The VTOC and Directory are used by 
DOS whenever you SAVE or DELETE a file. The 
Directory contains a list of sll the files on the 
dish Each entry contains a pointer to the 
track/sector list, file-locked and file-type code, 
file-name and file-size. The track/sector list is a 
list of track/sector pairs that are used to store 
that program. This is why SAVEing a blank file 
always takes 2 sectors. One for the blank file 
and one for the track/sector list. 

DOS formats a track by first writing a uni- 
que byte called a "sync byte". This byte (nor- 
mally $FF) allows the Disk II hardware to syn- 
chronize with the data on the disk. DOS then 



A pie section 
showing the con- 
trast in area occupied 
by each track/sector. 
There are 35 such divisions 
[usjally called Sectors) in each 
pie slice. The gray section has been 
enlarged and is shown on the next page. 
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WRITES an address mark, some more sync 
bytes and the data mark. At this time the data 
field is full of $O0's. 

The following is a normal address mark for 
3.3 DOS: 

D5AA96FFFEAABBAEAAFBEFDEAAEB 
It can be broken down into: 

Start of address D5 AA 96 



Volune number 


FF FE 




Track 


AA BB 




Sector 


AE AA 




Checksum 


FB EF 




End of address 


DE AA 


IB 



The volume, track, sector and checksum 
are in a 4 + 4 coded format (see 4 + 4 conversion 
chart). This means that 4 bits in each byte are 




actual data. The first byte is rotated left and 
logically ANDed with the second byte to recover 
the data. 

The data mark consists of: 



Start of data 05 AA AD 

Data field {342 bytes) 

Checksun (2 bytes) 

End of data DE AA EB 



The data field is encoded in a 2 + 6 format. 
Six bits of each byte are valid data. 

The basic structure of 3.2 DOS is similar to 
3.3 DOS with these notable exceptions: 

1. When initializing a disk, DOS 3.2 does 
not WRITE a blank data sector. Instead, it Just 
WRITEs enough $FF*s to fill the space a data 
sector would use. Trying to READ a track/sec- 
tor that has never been written to will always 
generate I/O errors. 





4 + 4 CONVERSION CHART 




AA+AA=OQ 


AE+FA'58 


BB+EA=62 


EA+BA*90 


EF+EA=CA 


AA+AB-01 


AE+FB=59 


BB+EB=63 


EA+BB=91 


EF+EB=CB 


AA+AE=04 


AE+FE*5C 


BB+EE=66 


EA+BE*94 


EF+E£*CE 


AA+AF=05 


AE+FF=5D 


BB+EF=67 


EA+BF*95 


EF+EF=CF 


AA+BA=10 


AF+AA=OA 


BB+FA=72 


EA+EA*CO 


EF+FA-BA 


AA+BB=12 


AF+AB=0B 


BB+FB=73 


EA+EB=C1 


EF+FB=M 


AA+BE*14 


AF+AE=OE 


BB+FE*76 


EA+EE*C4 


EF+FE*BE 


AA+BF=15 


AF+AF=OF 


BB+FF-77 


EA+EF*C5 


EF+FF*BF 


AA+EA=4Q 


AF+BA-1A 


BE+AA*28 


EA+FA*D0 


FA+EA'EO 


AA+EB*41 


AF+BB=1B 


BE+A&29 


EA+FB*M 


FA+EB=E1 


AA+EE=44 


AF+BE=1E 


BE+AE=2C 


EA+FE=D4 


FA+EE=E4 


AA+EF=45 


AF+BF=1F 


BE+AF=2D 


EA+FF*D5 


FA+EF"E5 


AA+FA=50 


AF+EA*4A 


BE+BA=38 


EB+AA=82 


FA+FA*F0 


AA+FB=51 


AF+EB=4B 


BE+BB=39 


EB+AB*83 


FA+FB=F1 

i 


AA+FE=54 


AF+EE*4E 


BE+BE=3C 


EB+AE=86 


FA+FE=F4 

i 


AA+FF=55 


AF+EF=4F 


BE+BF=3D 


EB+AF=87 


FA+FF*F5 

i 


AB+AA*02 


AF+FA*SA 


BE+EA*68 


EB+BA=92 


FB+EA*E2 

i 


AB+AB=03 


AF+FB=5B 


B£+EB=69 


EB+BB=93 


FB+EB=E3 


AB+AE=06 


AF+FE=5E 


BS+EE*6C 


EB+BE*96 


FB+EE=E6 


AB+AF=0? 


AF+FF=5F 


BE+EF=6D 


EB+BF*97 


FB+EF=E? 


AB+BA=12 


BA+AA=20 


BE+FA*78 


EB+EA=C2 


FB+FA=F2 


AB+BB=13 


BA+AB=21 


BE+FB=79 


EB+EB=C3 


FB+FB=F3 


AB+BE=26 


BA+AE=24 


BE+FE=7C 


EB+EE=C6 


FB+FE=BE 


AB+BF=17 


BA+AF*25 


BE+FF*7D 


EB+EF=C7 


FB+FF=BF 


AB+EA=42 


BA+BA*30 


BF+AA*2A 


EB*FA'D2 


FE+EA=E8 


AB+E&-43 


BA+BB*31 


BF+AB*2B 


EB+FB=D3 


FE+EB*E9 


AB+EE'46 


BA+BE=34 


BF+AE*2E 


EB+FE=D6 


FE+EE=EC 


AB+EF*47 


BA+BF=35 


BF+AF=2F 


EB+FF=D7 


FE+EF=ED 


AB+FA'52 


BA+EA=60 


BF+BA*3A 


EE+BA=98 


FE+FA=F8 


AB+FB*53 


BA*EB=61 


BF+BB=3B 


EE+BB=99 


FE+FB=F9 


AB+FE=56 


BA+EE'64 


BF+BE=3E 


EE+BE-9C 


FE+FE'FC 


AB+FF=57 


BA+EF=65 


BF+BF*3F 


EE+BF-9B 


FE+FF-FB 


AE+AA=08 


BA+FA=70 


BF+EA=6A 


EE+EA=C8 


FF+EA=EA 


AE+AB=09 


BA+FB*7l 


BF+EB*6B 


EE+EB=C9 


FF+EB=EB 


AE+AE=OC 


BA+FE=74 


BF+EE*6E 


EE+EE=CC 


FF*EE'EE 


AE+AF=0B 


BA+FF*75 


BF+EF=6F 


EE+EF=CD 


FF+SF=EF 


AE+BA*18 


BB*AA=22 


BF+FA*7A 


EE+FA*D8 


FF+FA=FA 


AE+BB=19 


BB+AB=23 


BF+FB=7B 


EE+FB=D9 


FF+FB=FB 


AE+BE*1C 


BB+AE-26 


BF+FE*7E 


EE+FE=BC 


FF+FE=FE 


AE+BF=1D 


BB+AF*27 


BF+FF*7F 


EE+FF=DB 


FF+FF=FF 


AE+EA-48 


BB+BA*32 


EA+AA*80 


EF+BA=9A 




AE+E£x49 


BB+BB*33 


EA+AB*81 


EF+BB=9B 




AE+EE=4C 


BB+BE*36 


EA+AE=84 


EF+BE=9E 




AE+EF=4D 


BB+BF=37 


EA+AF=85 


EF+BF=9F 
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2, The data is encoded in a 3 + 5 format 
which requires 410 bytes to encode 256 data 
bytes. This is one reason why there are only 13 
sectors. 

For those of you who are interested in more 
details and think I glossed over some things 
(and I did), the best book I have seen that talks 
about DOS is BENEATH APPLE DOS by Don 
Worth and Pieter Lechner.... A worthwhile addi- 
tion to any Apple computerists library. 

There are two things to consider when you 
decide to protect your disk: 

1. Protecting against normal DOS copiers and, 

2. Protecting against bit (nibble) copiers. 

The first is fairly simple. Almost any change in 
the normal disk format will cause DOS to 
generate an I/O ERROR. The end-of-address 
and end-of-data bytes (DE AA) are not used in 
the initial BOOT. Therefore, changing these 
bytes will allow a disk to BOOT but not allow 
normal DOS to copy it. 

The easiest method of accomplishing this is to 
change the appropriate locations in DOS and 
(NITialize a disk with the changes. However, 
LOADing anything other than your "hello" pro- 
gram onto this disk could be tedious. You would 
have to change the DOS back to normal, LOAD 
your program from a normal disk then change 
those same DOS locations and SAVE the pro- 
gram to your protected disk. 

Another method would be to LOAD the pro- 
grams from the cassette input and SAVE them 
to the disk. 



The best method would be to use "Muffin" to 
upLOAD your programs from a normal disk. 
This works because Muffin uses an internal 
DOS (RWTS) image to READ data and resident 
DOS to WRITE data. 

A more elegant method is to take advantage 
of the way that DOS WRITES data to the disk. 
When DOS WRITES a sector, it first looks for the 
address mark. When it has found the correct 
mark for the sector it wants, DOS WRITEs a 
whole new data mark. It first WRITEs 5 sync 
bytes then the complete data mark with the new 
data. Every time you SAVE data to a disk this 
process is repeated. 

NOTE: The address mark is only written once 
when the disk is INITialized. 

A program could be written that would READ 
the data from a normal disk and WRITE it to 
another in a changed format. This changed disk 
would not be copyable by any normal DOS. 
Table 1 is a list of address and data mark loca- 
tions and their normal values for a 48K Apple, 

CAUTION: Always change both the READ 
and WRITE locations for any byte you alter. 
Also, not ail values are valid. See table 2 for a 
list of valid bytes to use when making changes. 

The second part of disk protection involves bit 
or nibble copiers. 

These programs do not depend on a rigid 
structure of address and data marks to find 
valid data. Instead they make as few assump- 
tions about the disk format as possible. These 
copiers use pattern recognition to find the data. 
They are not as reliable as a normal DOS copy 



program since they don't use checksums. 

Many of the current bit copiers do make one 
assumption. They look for a $FF sync byte. 
These copiers can be defeated by INITializing a 
disk with a different sync byte. 

I am sure that the new crop of bit copiers will 
have corrected this oversight but, until then, 
this is a valid protection method. The location of 
the sync bytes are also given in Table 1. 



Bobby has been quite busy lately 
and he expects to become busier" in 
the future so his columns may be 
printed on a more irregular basis. 

For this reason, He has put as much 
into this DiskLocks as he has had 
time for. Like the rest of us, he 
is quite busy, but we'll be printing 
anything he sends us. Don't forget 
to read his SoftKey part 2! 

If you have more information on the 
subject of Copy Protection schemes, 
please send us a letter including 
that valuable information. 

editor 



WOOQCBflflO Q OOQO Q OflflQ B BflOOOOOQ fl Q aO OOQeO O QOQ Q OBQQOB O OO Q Ofl O flO Ofl OC 

Your Apple too slow ? 
Not anymore. .. 



Now you too con wrlre 6809 programs for your Apple II rhar ore 
DOS 3.3 compatible. Dut you don't hove to stop there, you con 
also program your Apple H's65D2 and the 6509 of THE MILL to run 
SIMULTANEOUSLY. 

THE ASSEMBLER DEVELOPMENT KIT including THE MILL, is o roll 
feature assembler, designed ro use rhe text editing system of your 
choice. The system will also boost your computer programming 
productivity, since the 6309 is today's easy ro learn and program 
com purer. Take advantage of rhe 8 -bit 6502 and the 16-bit 
abilities of the 6809 running at the same time, create your own 
MULTIPROCESSING ENVIRONMENT on the Apple II. 

PutTHEMILL into your Apple II and get power, performance and 
price matched by no other personal computer. 5TELLATION TWO 
offers a full 1 year warranty and a 60 day money back guarantee. 
if you're nor completely satisfied with the power of THE MILL. 

Shop around, then compare the service, quality, price and 
power of THEMILL. Take this ad ro your locol Apple Dealer and see 
the endless possibilities of adding THE MILL ro your Apple II. 





THE* MILL transforms the 8-bir Apple II 
into a computer thor acts like a 
1 6-bit machine. THE MILL has 
unique hardware features that 
permit trie 6609 to run at full 
speed (1 megahertz) and 
allow the 6502 rorunat 
20% of its normal 
speed — 
ATTHE SAME TIME! 



Find our about 
THE MILL and get 
involved with the 
hottest item on the 
personal computer 

marker today. 
No existing personal a 
cangiveyou the powe 
performance and price of THE MILL'S 

6609-6502 combination. 



RO. BOX 2342 -H2 

SANTA BARBARA, CA, 93120 

(805)966-1140 



Apple II 
is a trademark 
for Apple Computer, Inc. 
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How 
To 

Back 
Up 
Copy- 
Protected 
Disks 



a continuing series... 
by BOBBY 



For more information on 
making back-ups of non- 
standard diskettes, see: 

HARDWARE SOLUTIONS on page 

DISKLOCKS on page 24. 

REVIEW of NIBBLES AWAY, 
another 'bit' copy program, 

on page 14. 

D1SKEDIT 2.1 listing on 
page 60. 

CHR$(4) and DISKVIEW list- 
ing on page 42. 



PART II 

for Apple ][+ without an INTEGER firmware card 



Many Apple 11+ owners do not own an 
Integer firmware card This method is especial- 
ly appropriate for you. 

Do you have a disk that boots on a 13 sec- 



tor and a 16 sector Apple? The chances are 
good that the disk follows a 13 sector format. 
Muffin was created to move 13 sector files to a 
16 sector disk. With a few changes, it can also 
be used to READ nonstandard disks. 



USING SOFTKEY MUFFIN 13 



Requirements: 
Apple II or Applell with 48K 
MUFFIN13or MUFFIN 16... 
Blank initialized disk (16 or 13 as 
appropriate). . 
DiskView (or other nibbler)... 

Perform the following steps: 

1. RUN DiskView 

2. Remove the DiskView disk and insert the 
back-up copy of your program disk. 

NEVER USE THE ORIGINAL DISK 

3. READ track 3 and look for the starting 
address and data marks. The normal values 
are: 

DS Aft 135 (address) 
m ttfl fiD (data* 

These bytes can be located by looking for 
the sync bytes These are a group of similar 
bytes or pattern of bytes, (ie. a series of FF's or 
a pattern that repeats. D5 AB D5 AB D5 AB etc. 
See Disk Locks) 



4. Write down the values that you find. 
about 6 or 7 tracks and READ again. 



Skip 



1, 



5. Repeat step 4 several times. If the values you 
found were not the same on each track then this 
method will not work for you There is one ex- 
ception and that is if the same byte was changed 
each time and that byte is the last byte of the 
data mark (ie. D5 AA FE D5 AA DD D5 AA FD). 



NOTE 1: See disk locks for more information on 
address and data maTks. Practice on a normal 
DOS disk until you are familiar with the disk for- 
mat and can easily find the address and data 
marks. 

NOTE 2: Check a higher track (ie. track 3 thru 
34) and use the 4 4 Conversion Chart in 
Disklocks to convert the sector bytes for each 
address mark to hex. Verify that the sector 
numbers range from to 12. If the sectors are 
numbered differently (ie. by even numbers. 
0,2,4,6,8,10 etc.) then this method will not 
work. 

6. BLOAD MUFFIN13 
7 CALL -151 



NOTE 

Replace the boxed symbols with the 
proper address or data mark. 
Replace: with: 

rfiJJ 1st byte of address mark 

[a5| 2nd byte of address mark 

[A3] 3rd byte of address mark 

(i)]] 1st byte of data mark 

g2f 2nd byte of data mark 

| D3J 3rd byte of data mark 

8. Type in the following changes and use the 
values you found in steps 3 thru 5: 



1A76 


EI 


Return 


1A80 


tsa 


Return 


1A8B 


E3 


Return 


1A08 


ED 


Return 


1A12 


m 


Return 


1A1D 


m 


Return 



NOTE: If your disk uses a variable third byte in 
the data mark, then make the following addi- 
tional change: 

for MUFFIN13 only... 

1A1E:EA EA Return 

for MUFF IN16 only... 
19FD:EA EA Return 



9. 803G return 

10. Respond to the prompts with the appro- 
priate slot and drive lor the source and destina- 
tion disks. Be sure to insert the disks in the cor- 
rect drives. If you are using only one drive, label 
the disks clearly to avoid confusion. Respond to 
the file name prompt with the equals sign ( ) 
and type N to "do you want prompting": tf you 
are using one drive, the program will still 
prompt you to switch disks when necessary. 

There's MORE on SOFTKEYs on the 
next page: 

HOW TO USE MUFFIN 16, and 
the SOFTKEY TO INTEGER 
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Here is some supplimentary information 
for the open-heart surgery method presented in 
issue 1. 




integer 

PROGRAMS 



by BOBBY 



Several people have asked about how to find 
Integer programs. The zero page pointers for 
Applesoft and the normal DOS pointers for 
Binary were given in Softkey part I. The zero 
page pointers for Integer are: 

Start of program. . . 
$CA, $CB (202,203) 

End of program. .. 
$4C, $<*D (76,77) 

These pointers tell your computer where 
the program is in memory. The hex address is in 
normal 1o-byte r hi-byte format. 



SOFTKEY part 2 continued from 
page 29... 

. ..using MUFFIN16--- 



The steps for using MUFFIN16 are the 
same as above except for the following: 
a. In step 3, the bytes to look for are: 



D5 AA 96 
D5 AA AD 



Address 
Data 



Use these pointers and apply then in the OPEN HEART SURGERY 
METHOD revealed in the Premier Issue, page 27. Good luck. 
If the DOS is not too altered, it will work. For those who 
don't have the integer card, see HARDWARE SOLUTIONS, .page ffi, 




b In step 6, BLOAD MUFFIN16. 
c. Replace step 8 with: 

8 Type in the following changes and use 
the values you found in steps 3 thru 5: 

1A55: @ Return 

1A5F: SP Return 

1A6A: JA3) Return 

1-9E7: tEB Return 

19fl:tSU Return 

19FC: Return 

(of course, replace boxed symbols 
with the appropriate byte.) 




The national phone book of computing 

Computerist's Directory 



$7.50 



Let your 
fingers 
do the 
talking" «,— 



%13 
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Muffin is a program on your 3.3 DOS 


THE 


Master disk. Those of you with 3.2 DOS will 


need to get a copy from a friend or your local 




dealer. Muffin is used to transfer 13-sector files 


NEW 


to 16-sector disks. To do this, it contains an 


image of 13-sector RWTS (Read or Write a 




Track and Sector). It uses the 13-sector RWTS 


SOFTKEY 

MUFF 


to read a file and then writes to your 3.3 
diskette using the resident DOS. 

INS 


1WI mm m m 


H mm M 

Muffinl3 is created by changing the RWTS 


FOR 3.2 DISKS. 


image so that it doesn't use the checksum or 
end marks. 




1. BLOAD MUFFIN 


how to make 


2. Type in the following POKEs: 




POKE 6826,24 return 


MUFFIN 


POKE 6827,96 return 
POKE 6734,24 return 




POKE 6735,96 return 


13 


3. BSAVE MUFFIN13, AS803, LS18FD 




Muffin can be modified to READ files on 




16-sector disks. You'll need the Programmer's 


FOR 3.3 DISKS. 


Aid ROM {The Integer card comes with this 
ROM). 


* 


1. Type INT return (for integer card) 




2. BLOAD MUFFIN 


how to make 


3. CALL 151 

4. Type in the following: 




A. D4D5G return 


MUFFIN 


Initializes the Programers Aid Code- 
Relocation feature See page 16 of your Pro- 


16 


gramers Aid Manual (PAM). 


B. 1900<B800.BFFF Ctrl Y* 




return 




Tells the relocate routine what we're mov- 




ing and where it goes. See page 16. PAM. 




C. 1900<B800.BA10 Ctrl Y 




return 


by BOBBY 


Moves the first Code segment down to 




$1900. See page 17, PAM. 




D. .BC5/M return 




Moves the Data segment. See page 17, 




PAM. 




E. .BFFF Ctrl Y return 




Moves the last Code segment. 




F. POKE 6701,24 return 




POKE 6/02,96 return 




POKE 6793,24 return 




POKE 6794,96 return 




5. BSAVE MUFFIN16, AS803, LS18FD 




ft I 








* 

* 
* 
* 
# 
# 
# 

* 

* 
* 
* 
# 

# 

# 

# 
* 
* 

* 
* 
# 
* 
* 
# 
* 
* 
# 
* 
* 
# 

* 
* 

# 

* 

* 
* 
# 
# 

* 

* 
* 

# 

* 
# 

# 
* 

# 

* 

* 

* 
# 
# 

# 

# 
* 
* 



ROMPLUS 

NEEDS 

ROMS 

FOR 

APPLES 



RESIDENT FIRMWARE UTILITY 
PROGRAMS WILL EXPAND THE 
CAPABILITIES AND INCREASE THE 

USEFULNESS OF YOUR APPLE II OR 
APPLE II PLUS! * 



'APPLESOFT EDITROM 

Global search, change, or remove any 
string, variable., literal, constant, or baste 
command word lhat appears in your 
Apnlesof* Programs. EDlTROM uses no 
ram space that will interfere with your 
program. It does not reset any system 
pointers to protect itself and will operate 
with any size system - l&K, 32K : or 4flK. 
After EDlTROM has been IntttStfsed, lhe 
ampersand {&) command can men be 
used to cad the EDlTROM back for 
repeated use without readdressing the 
ROM -t- GOARD. Completely compatible 
with Konzen's Program Line Editor If 
PLE fS tip, EDlTROM will keep PLE up 
and allow join! operation. 
Will operate wi(h any version of DOS and 
requires Fp j-h Rom. 35.95 

COMMANDROM 
COMMANDROM Is like having a resident 
l FlD' but with more operating feaiures 
and conveniences. COMMANDROM will 
read a disks (13 or 1B Sector) File 
Directory Listing and display the 
Showing- A Command; Menu, current 
ddve number, number of sectors used 
and lef!, number of pages set up to hold 
alt file names, the first pace o' fire 
names, and an inricntification letter nex! 
to each file name on display. Pressing 
any one of the command keys will load 
or am any file (A L R' file load will drsplay 
slart and length addresses.). k>ck or 
unlock a fife of all files, delete, a file - with 
verify before deletion, change from one 
drive to the gthej. read a new di.sk, 
display a TracJWSector Map. change page 
numbers to view all file listings without 
recatalogmg : or exit to current language 
or monitor. No system pointers arc reset 
and no RAM is reserved for 
COMMANDROM. Requires 4SK: 3.2 or 
3 3DOSand INTor FPinROM 35,95 



BA5ICSROM 

Will boot a 13 sector disk on a syslem 
configured for 16 sector operation. The 
BASICSROM can be addressed on 
coldstart {withou! Auto Start ROM o f 
warms-t'arl (with Auto Start ROM) al any 
time 35-95 



DISK COPY/SPACE ROM 

Duplicates a disfc. f rom eilher SINGLE or 
DUAL drive, single or dual controller. *3 
or )6 sector and with or wilho.ut VTOC. 
Options include ■ Gjoss copy, active 
sectors only copy. DOS overwrite, auto 
boot of copy disk, tree space on d'Sk in 
sectors and kilobytes, and init and 
volume number are selectable. Requires 
a mirimumof 32 K 35.95 



'APPLESOFT RENUMBER/ 
MERGEROM 

Made famous by Apple Computer Inc., 
this powerful utility will not disturb any 
part of a program in memory, wlien il is 
activated. Peguires dflK. wttn or without 
Disk ll. 35.95 



l YOUR'PLEROM 

Mdv.' you can nu! your Program Line 
Fditnrin flOM. Writs for details. S45.95 
■^FK^Tt ftfru TRADEMARKS 

BOX 599 
WEST MJLFO'RD. N.J. 07480 

Soft CTRL Systems 



201-728-8750 
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Apple Softies are programs presented in away that will reveal certain aspects of Applesoft BASIC. These programs 
are not only valuable in themselves, whether they are instructive, business or entertainment software, but also are 
valuable as examples of how to utilize AppteSoft in your own programs. By typing in these programs and then Bite ring lines 
to fit your own needs and esthetics, you will refine your own knowledge of Apple Soft. 

More importantly, we hope that ycu will make creative improvements. If so, please send them in to us so that other 
readers may enjoy them, too. 

Note: We have thed to make the variable names as explanatory as possible. But you know that in Applesoft, only the 
first two characters of a variable name are important so you may want to shorten the names to just those two 
characters. However, be certain to include the variable suffix [%, $ or array notation]. 



For those who have been programming in Integer, Applesoft 
string manipulation at first seems a bit complex, however, with ex- 
perience, it seems perfectly logical and simple. If you're in between 
these two extremes [total ignorance and total know-how], then you 
understand that concantenation sometimes is e chore, albeit, a 
necessary chore especially when writing business and educational soft- 
ware. 

Here's a game that depends on string manipulation: Text In- 
vaders. But before you snap "bah. humbug!" to this program, please 
read further. I tried to duplicate certain characteristics of the arcade 
version in this text-page pseudo-clone of that popular computer game. 
That means that I have incorporated the "Thump! Thump ! " of march- 
ing invaders as they descend upon you. The invaders do "march" back 
and forth. Their "legs" are alternately stashes and inequality signs 
K > / \ ]■ All this animation is accomplished by TABbing and PRINTing 
Strings. 

Text Invaders 2.0 manipulates several strings. The most complex 
of these is called INVADER£[1], It is with this string that we will see 
the use of all the string-manipulating commands: STRS(n), VAL [a], 
LEN (A*), MIDS[H$,b,1 ], RIGHTSEAS.b], LEFTS[AS.b] and. of course, 
concantenation. 

This program has been divided into five "RUNning" segments. 
That meens that after you have keyed in the first part, you must run it 
in order to see if it works. If not, then de-bugging is in order. Then you 
add the next part to it and run it. This is an experimental listing to see if 
readers prefer this type of program listing to the standard "list it all at 
once" method used by other magazines. [This program was previously 
listed, with minor changes, in Update 1 .1 in yet another experimental 
way, still different from the normal "listed" style. In both methods the 
AppleWriter has been used as the text editor.) 
The five segments ere: 

Step 1 . Introduction, Graphics and Variables... 

Step 2. The Rhythm, March and Descent of the Inveders... 

Step 3. Tank Commands and Motion... 

Step 4. The Invaders Attack... 

Step 5. The Tank Strikes Back... 
You are now ready to begin. The text directly preceeds its 
appropriate program listing... 

1 introduction & initial graphics 

Key in Step 1 . This will set up the initial graphics and let the player 
select a skill level. 

The intro-"skill choice selector" is an example of an active, user- 
proof [except for Ctrl C and Reset] keyboard entry program. It will 
accept only what it is looking for, flashing an error message whBn 
applicable and, while waiting for an entry, will display the choices 
available in an interesting fashion. To do this, it does not use INPUT or 
GET statements which halt program execution, but rather PEEKs the 
keyboard [—1 6384] to see if b selection has been made. If no selec- 
tion has been made, it merrily goes about flashing the next choice and 
PEEKing the keyboard until an entry has been made. If the entry is not 
valid, an error message is flashed one letter and one buzz at e time yet 
quickly enough for the entire message to be printed and removed in one 
second. It does this by using the MIDS function and a FDR-NEXT loop. 



The program sequence in step 1 is: 

A. Variables are defined {1 0000-1 091 0] 

B. Text Page Graphics are Printed: 

1. Screen is "whited-out" and inverse text is printed 
[1 1 000-1 1 030] followed by NORMAL text on the top Bhd bottom 
[11050-11070]. 

a. A "window" is made [PQKEs 32 thru 35.. see page 
128, Applesoft Reference Manual] and cleered [CALL -958] in lines 
11100-11120. 

3, Bashing "bunkers" or barriers are printed consisting of 
regular slashes and back slashes [1 1 200]. 

C. The player's skill level is requested [1 200D-1 2090] While 
waiting for the answer, lines 1 2050-1 2070 flesh and buzz across the 
printed choices, prompting the player to choose. If the player chooses 
anything other than numbers 1 thru 5, the error routine is activated, 
printing and buzzing quickly across the top part of the graphics field and 
vanishing [120BO-1 2090]. 

D. The "Window" is cleared [line by line] of the skill prompts, 
leeving the flashing bunkers intact [1 21 00] and the proper number of 
Invaders are Greeted [130DO-1304O] and printed in the window 
[12210]. 

We first meet string concantenation in line 1 01 50 [BUNKERS], 
then in line 1 0900 where SPACES is created out of spaces. 

Then in lines 1 3020. 1 3030 the INVADER strings are created. 
To change the eppearance of the invaders, you need only change these 
lines. For example, if you want the invaders to have different legs, 
chenge line 1 3030. if you want their hit points to be less than 9, 
change 1$ to "8" or "5" or some other number. WARNING: Do not 
make it larger than a single character or the program will not work! IS 
must not be greater than "9". 

Run the program and debug of typos. 



<«««««««£TEP 1»»»»»»»»» 
i GOTO 10000i REM **Begin Ga«e** 

Init Variables- 

1000O SPEED = 255* NOTRfiCE t NORMAL s 

TEXT : HOME 
10160 NOISE = - 16336: STROSE = 

- 16368 i KEY • - 16384 
10110 HINvADERX * 3: VINVADERX m 51 

ITRAVELX ■ is I* = "9" 
10120 RIGHT% * is UFTX = 2: TRAVEL* « 

2t FRHYTHMX « - 1 
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] TEHT 

invaders 
E.Q 



nan. 
r. 



" SPACE = SHOOT! 


ESC - 


HEW GAME 




m m rrrr n 


a 


m n 






1SZ 37C 33C 

< ■> / S < > 


asc use 

< > / \ 

■ 


*** 
* ; 






luturt 


Lin 




■*- + * 

■-'r ; iLUE $*# 
1 5 * 1 


f£> p - ^ fi r) r* a 
i L r* t i i'i y 


it O ~? *~> 

f ' {... ■„,' *. f •;. 


i <-LEFT RETURN - 


STOP 


RIGHT.-..-.? Vi 



1013* POWERX - ?! TTRAVELX « 2 

1*14* HCUNX « 19i VGUNX » 17: DISPLAY* 

* l: AGAINX ■ 1 
1*15* BUNKER* - CHR* <22«> + CHR* 

<239> + CHR* (228) + CHR* (239) 
1016* IVRAYX ■ *: IHRAYX = «: THRAYX 

= 2 
1*18* ZAP*(*> * "*": ZAPMI) » "!": 

ZAP*<2> = " " 





Tank 


Hit Power Numerals 






195** 


DATA 


" *** ** 


**** **Ktt 


H* 


*** " 


1*51* 


DATA 


" Hi #* #% #* 




1*52* 


DATA 


w tiS*:* 


** *** ** 


*****" 


1*53* 


DATA 




itJL JLJLJ1 


JLJLJLJt.ttJt 14 

TrirTfiririr 


1*54* 


DATA 


"#$ ***# 


******* 


** 


**" 


1*55* 


DATA 


11 JI.JUtJi.JI. J LJt 

innfwirtrv 


M JUL It 
if irncw 




1*564 


DATA 


"** *K 


**** ** 


It* 


ft** " 


1*570 


DATA 


II.IULJUtJL 

■wiririr'nr 


JU*. JUL JlJl 
■trw wir WW 


JL Jl . 1 1 
*F1T 


1*58* 


DATA 


" **« ** 


** *** *K 


It* 


*** " 


10590 


DATA 


1} JLJIJt itjt 

irinr irir 


#9 %im 


J4..JL 

inr 


>L JL 1 1 

irit 




Fill Special 5TR* 







1*600 ERR* = "CHOOSE A NUMBER FROM 1 

TO 5" 
1090* FOR A m 1 TO 4*5 SPACE* = SPACE* 

+ " "! NEXT A 
1*91* FOR A - TO 9: READ POWER*<A): 

NEXT A 



Print Graphics On Text Page 



1100* INVERSE s FOR A * 3 TO 24: VTAB 

A! HTAB 1= PRINT SPACE*;: NEXT A 
11*1* VTAB 19i HTAB 24: PRINT "SCORE:" 
11*2* VTAB 19: HTAB 2: PRINT "TANK": 
PRINT "VALUE": HTAB 4: PRINT 
"I5"s HTAB 3: PRINT »-=>■", 

11*3* VTAB 22: HTAB 14: PRINT 

"SOFTKEY TEXT INVADERS 2.*"; 
11*50 NORMAL: VTAB 24: HTAB 2 
11*60 PRINT "<-LEFT"U HTAB 15: PRINT 

"RETURN - STOP"?: HTAB 33: 

PRINT "RIGHT ->"* 
11*7* VTAB l: HTAB 2: PRINT "SPACE = 

SHOOT!"?: HTAB 26s PRINT "ESC * 

NEW GAME"? 



Make and clear gane window 

111*0 POKE 32,1: POKE 33,38? POKE 

34,3: POKE 35,16 
1111* VTAB 3: HTAB 1,1 CALL - 958 

1112* VTAB 3: HTAB 1? INVERSE : PRINT 
RIGHT* <5PACE*,38>? 

Print Bunkers 

112*0 FLASH ! FOR A = 12 TO 14: VTAB 
A: HTAB 4: PRINT BUNKER* I i HTAB 
13: PRINT BUNKER*?: HTAB 22: 
PRINT BUNKER*?: HTAB 31: PRINT 
BUNKER*;: NEXT A: NORMAL- 
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13820 NX * SKILL* + 2: FOR A ■ 1 TO 

Ask for Skill Choice NX: INVADER*<1) * INVftDERfU) * 

"3" + I* + CHR* <91) + " " 

13030 INVADER*(0) * INVADER*(0> + V " 
12000 VTftB 5s HTftB 7i PRINT "WHAT IS * CHR* (220) + " ** INvftDER*(2) 

YOUR SKILL LEVEL?"?: VTftB % * INVRDER*(2> * "< > " 

HTftB 9: PRINT "1. . . .2. . . .3.. . .4 1304* NEXT ft: RETURN 
„..„5"*>s VTftB 9: HTftB 14* PRINT 

< pick one >■■» 2 the march of the text invaders 

12010 A * 5 

12020 KEYX = REEK (KEY): IF KEYX < Now that you've gotten the preliminaries out of the way, it's time 

127 THEN GOTO 12050 to get down to the serious invader invasion... 

12038 IF KEYX < 177 OR KEYX > 181 THEN Step 2 consists of all the invader invasion controls: the "thump! 

CTiXd \0&aa thump!" of their march back end forth, and down the screen toward 

. 77. . t Z^,~ .»,, ™™ • -■n«a andthroughthe"bunkers".Hereyouwillseethemoving"legB"ofthe 

12O40 SKILLX * KEYX - 1/*: GOTO 12100 invaders. Kay in step 2. 

1205* VTftB 7* HTftB ft * 5 + A" The invasion sequence, repeated over end over, goes like this: 
INVERSE : PRINT ft?: ZZ = PEEK 

(NOISE) ~ PEEK (NOISE): FOR C = A the Main Program Controller [1000-2950]: 

1 Tfi 1 S - MFXT C: NORMAL 3 HTftB ft ^ s^cts the "gait" of the invaders' march [1010], 

w =, + 4- PRINT ft! ^' se i ects the Invaders' direction of travel [ITRAVEL%, 

l2%6 * ft : * Jj£ 1F ft > 5 TH£N fl = 1 ' 0l 3. determines the HTAB and WAB values [HINVADER%, 

1 2070 GOT 1 i0i.0 VINVADER%] and clears old invader strings from window [going right: 

2400-1420: or going left: 2500-252D], 
a =;=«= =a =e======st=K===a=B= ======== ==*=i=s 4 VTABs, HTABs, and PRINTs the invaders [2900-2950). 

FRHYTHM% is used as a flip-flop switch to select which legs to print 
[2950]. FRHYTHM is either 1 or-1. If you add 1 to each value, you get 
either or 1 , hence the last part of line 291 0: PRINT INVADERS 
[FRHYTHM % + 1]. Remember, INVAOER$[D] are slashes and 
INVADERS[2] are inequality signs. 



Error in Skill Choice 



12080 VTftB 2: INVERSE s FOR B = 1 TO 

LEN (ERR*): HTftB B + 5: PRINT 
MID* (<£RR*),B ( 1);: I ■ PEEK 
(NOISE): NEXT B 
12090 PRINT CHR* (7)5: POKE 5TROBE,0i 
HTftB 55 PRINT RIGHT* (SPACE*, 
LEN (ERR*) + 1): NORMAL : GOTO 
12020 

Print New Invaders 



12100 VTftB 5: HTftB H CftLL - 868: 
VTftB 7s CftLL - 868: vTflB 9: 
CALL - 868: 

12200 GOSUB 13000 

12210 VTftB VINVflOERX:HTftB HINVADERX: 
PRINT INVftDERt(i) 

12999 END 

Recreate Invaders 

13000 IF SKILLX < 6 THEN SKILLX * 
SKILLX + 1 

13010 FOR ft a TO 2: INVftDER*(ft) ■ 
NEXT ft 



5. The Thumps are then added depending again upon which 
type of leg is printed (FRHYTHM%, 1500-1520]. The two types of 
thumps are created by PEEKing - 1 6 336 twice times the quantity 1 6 
less the VTAB of the INVADER$[1 ]. The only difference between the 
two thumps is the interval created by the addition or subtraction 
process I 

B. The whole process repeats itself, if the invaders are too far 
right, the invaders must march left [2400/2], and if too fer left, they 
must go right [251 0]. If too low, then the game must end [1 000] and 
the player is given the choice of beginning again or quitting 
[21000-21090]. 

C. Be certain that these two lines[10600,11230] are not 
forgotten or you will get either a REDtM'D ARRAY error or an OUT OF 
DATA error. RUN it and debug of typos. You will note that the invaders 
march and descend rather quickly and you may wonder how one can 
possibly win such a game... Well, after the other "search and move" 
routines are placed in the command sequence, the inveders will not be 
moving as quickly. 



«««««<«««STEP 2»»»»»»»» 

K«**K*tt**«K*K********«***************** 

Main Program Controller 

a************************************** 

1000 IF VINVADERX « 14 THEN 21*00 
1010 FOR RHYTHM = TO 100 STEP 

VINVADERX * 10 
1080 NEXT RHYTHM 
1090 GOTO 2000 
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Various Noise Routines 



1506 FOR A ■ « TO 16 - VINVADERX: IF 

FRHYTHH% > e THEN 1520 
1510 ZZ m PEEK. (NOISE) ~ PEEK (NOISE): 

NEXT s RETURN 
1526 12 * PEEK (NOISE) + PEEK (NOISE): 

NEXT i RETURN 
1536 12 = PEEK (NOISE) i RETURN 

Invaders Hove 

2000 IF LEN <INVADER*<1>> < 5 THEN 

20000 
2610 IF ITRfiVEU « LEFTX THEN 2366 



Invaders March Right 



2400 HINVABER3S = HINVADERX + li IF 

HINVADERX > 37 - LEN ( INVADER* 
(1)) THEN ITRAVELX * LEFTX: VTAB 
VINVADERX: HTftB l: CALL - 868: 
IF 5KILLX < 3 THEN VINVADERX m 
VINVADERX + 1 



-Print Invader s- 



2410 VTAB VINVADERX: HTAB 1» CALL 

- 868: VTAB VINVADERX + IS HTAB 
is CALL - 868 

2420 VTAB VINVABERX: HTAB HINVADERX: 

PRINT INVADER*(l)i VTAB VINVADERX 
+ It HTAB HINVADERX: PRINT 
INVADER*<FRHYTHMX +1); 

2430 FRHYTHHX = ~ FRHYTHHX: GOSUB 
tmm GOTO 1000 

Invaders Harch Left 



2500 HINVADERX - HINVADERX - 1 
2510 IF HINVADERX < 2 THEN VTAB 

VINVADERX: HTAB 1: CALL - 868: 

ITRAVELX - RIGHTXi VINVADERX * 
VINVADERX + 1 
2520 GOTO 2410 



continued or page 36 
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continued from page 5 ... 

should concentrate on this subject and leave the 
other types of programs (eg. entertainment) to NIBBLE 
and SOFl'SIDE and computer club magazines. Less com- 
plaining about censorship would also improve the ma- 
gazine. Specific suggestions include: 

1. Further discussion of Locksmith and other copy 
programs. What and hou do you determine the Locks- 
smith parameters? Give copy parameters for different 
programs. 

2. give more specific examples of how to crack copy- 
protected disks including the copy programs them- 
selves. I am glad you will give copying techniques 
for the Apple 11+ with language card owners. 

3. Review Locksmith 4.0 in detail. I see you will 
review Nibbles Away shortly. 

4. Tutorials on DOS and disk formats. The DiskLock 
is a good start. You should also give examples of 
how this information is used. 

5. I don't see the purpose of the last Alert and the 
Garbage Award. Concentrate on the positive since 
people are paying a lot for your magazine. 

Enough preaching — 
Good luck, 
James Williamson 
Greenbelt, HD 



[This next letter requires the reprinting of a news 
item that appeared in Update 1.1: 

Creative Computing Censors 
Hardcore Advertisement 

Creative Computing is still censoring ads and suppressing in- 
formation about copy protection. It has just refused to publish the 
HARDCORE advertisement shown on this page. 

What did the editors of CC find unprintable in our ad? 

"Only two lines," explained their Advertising Manager, Jerry 
Thompson. "They are: 'back up any diskette', and 'do & undo copy- 
protection'." 

Jerry said that either we agree to let them remove those lines 
or they would refuse to run the ad. Well, we stood by our editorial 
policy of fighting censorship and they stood by their policy of infor- 
mation suppression. So you won't see this ad in CC. 

One of their editors, George Blank, defended CC's policy by 
offering the lame comparison to Reader's Digest's policy against 
running liquor ads. He added that at least CC will run ads for com- 
petitors. 

Big Deal! All of them share CC's censorship policy. All of 
them... except HARDCORE COMPUTING. And they will not run our 
ads. 

George's final defense was that CC had a readership of well 
over 100.0OO... so obviously they must be doing things right. What 
can 1 say to that? 

And when I mentioned that the readers have had no alter- 
native, he answered promptly, "Yes, they do!" (meaning his com- 
petitors). I retorted that they practice the same form of censorship, 

"That might mean that we're right and you're wrong," he 
concluded. 

continued on page 37 
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End Game or Try Again? 



< ESC key j 

120 IF KEYX = 155 THEN GOX = 1 : GOTO 



2100O HOME : VTAB 5= HTAB 5: PRINT 

"YOUR FINAL SKILL LEVEL HAS "5KX 

21010 VTAB 7: HTAB 5: PRINT "YOUR 
FINAL SCORE WAS "PTX 

21070 VTAB 13: HTAB 5: PRINT "DO YOU 

WISH TO TRY AGAIN? (Y/N) "!! GET 
AN*! IF AN* = "Y" THEN GOX * U 
GOTO 1000© 

2108© IF AN* = "N" THEN TEXT : HOME ! 
END 

21090 GOTO 21070 



Other Lines 



< RETURN key ) 

155 IF KEYX = 141 THEN TTRAVELX ■ 3 



( Right Arrow > 

160 IF mU = 149 THEN TTRAVELX * 
R1GHTX: DISPLAYS « 0s GOTO 200 



( Left Arrow > 

170 IF KEYX - 136 THEN TTRAVELX = 
LEFTX: DISPLAY* = 0: GOTO 300 



Move Tank *"" 

190 ON T TRAVEL?. GOTO 200,300,350 



10600 IF GOX THEN 11000 
11230 GOX=0 
1290© GOTO 1< 



3 tank commands and motion 

Key in step 3. This is a very short step that lets you command your 
tank. I decided to let this be step three so thet you could squirm after 
step 4 has been keyed in... 

Step 3°s sequence is as follows: 

A. The keyboard is checked [1 020][1 DO] to see if you pressed: 

1 . the ESCape key., that meens that you want to start all 
over again [1 20). 

2. the RETURN key... which stops all tank motion. 

3. the Right Arrow key.. .to go right. 

4. the Left Arrow key.. .to go left. 

B. Move tank either right [200] or left [300] or make it stand 
still [350] by erasing old tank and PRINTing a new one [31 0-230], 

C. Display the tank's "hit" power. This is a novel routine that 
uses the data statements end then VTAEVHTABs each cheracter into 
a rectangular area that measures 5 columns by 5 rows. The result is a 
number from 9 to 1 printed in " * " or " # " alternately [400-450], 

RUM and debug. You should now be able to move the tank back 
and forth, or make it stop. The tank will continue to move in the last 
direction selected [1 90) until it hits one side or the other when it will 
reverse direction. Test the controls. When fully bored, hit ESC. 



Move Tank 



200 



210 
220 

230 
300 



-Tank Moves to the Right 

HGUNX = HGUNX * 1* IF HGUNX > 36 
THEN HGUNX = 36STTRAVELX = LEFTXi 
RETURN 

-Print Tank 

VTAQ VGtINXs HTAB H CALL , - 868« 

VTAB VGUNX - 1* CALL - 868 

VTAB VGUNX: HTAB HGUNX - It PRINT 

" = "|i INVERSE : PRINT POHERX*: 

NORMAL : PRINT "*"? 

VTAB VGUNX - %i HTAB HGUNX! PRINT 

"I"H RETURN 



-Tank Move to the Left 

HGUNX - HGUNX - is IF HGUNX < 3 
THEN HGUNX = 3:TTRAVELX # RIGHTX: 
RETURN 






-lank Just Stands Still—™' 
GOTO 210 

:e as SKSSO mp ====3 zs assist; «==-.=::=* saia 

Display Tank Hit Power 



«««««««STEP 3> »»»»»»»»» 



:*ss==i as===ss===;===== 






Check Keyboard for command 






10© KEYX * PEEK (KEY): IF KEYX > 127 

THEN POKE STROBE,© 



400 BX = m INVERSE : FOR A = 19 TO 

23s FOR AA i 1 TO 5 
410 VTAB As HTAB AA + 5 
42© PIECE* = M2D* (POWER* (POWERX) * 

BX, I) 
450 PRINT PIECE*!! BX » BX + 1* NEXT 

AA,Ai NORMAL t RETURN 
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-Additional lines 



1028 GOSUB l»6s R£H 
11210 GOSUB 4*)«: REM 
12213 GOSUB 4Ms REM 



< CHECK KEYBOftRD> 
<H0VE TANK> 
<MOVE TftNK> 



4 the invaders attack 



You are now ready for step 4 where you will witness the wholesale 
slaughter of your tank and your bunkers. Key in step 4: The Invaders 
Attack! 

The sequence here is more difficult to explain because it consists 
of numerous subroutines The most important of these is the Attack 
Sequence itself which will he explained first. 

A. The attack itself begins [900] with a random number be- 
tween 1 and the number of original invaders, N%, [between 4 and B]. 
This number times 4 plus 3 gives the "centers" of each invader in 
INVADEHS[1], The old invaders are erased and the random number, 
RAN%, is checked for validity. 

B. That particular "center" is then: 

1 . Plucked out of INVADERS! 1 ] 

91D TEMPS =MIDS[ INVADER$[1) ]. RAN96 +1.1] 

2. Turned into a number: 
920 TEMP% = VAL [TEMPS] 

3. Dropped down a notch in value' 
940TEMP% = TEMP% - 1 

4. Turned back into a string' 
TEMPS = STRS [TEMP%] 

5. Stuck right back into INVAOEflSfl 1 
970INVADERS[1] = 

LEFTS [INVADERSm, RAN%] + 

TEMPS + 

RIGHTS [ INVADERS[1], LEN [INVADERS[1] ]-RAN% - 1 ] 

0. If the invader is dead, then it will get rid of its legs in almost 
the same way.. .[980], Lack of hit power [and therefore no more 
bombs to drop!] is another reason for the invader's demise and disap- 
pearance. Later, in step 5, this same routine is used to decrement the 
invaders when you hit them with your missiles. 

D, Condense the invaders by removing all spaces on the right 
side [660] and the left side [670], keeping the string compact and 
changing the HTAB value appropriately. 

The next phase in step 4 is the sequence followed when the screen 
is examined in order to determine if the invader's bombs have hit 
anything. 

The most important part here is, of course, the actual routine that 
examines the text screen memory. This is accomplished by using the 
SCRN command [see page B7 of your Applesoft manual. Normally, the 
SCRN[x,y] command will return the color code (0-1 5] of the x,y coor- 
dinates [between and 39 for "x", and 47 for "y"]. 

Since each text character is composed of two such color codes, a 
formula must be used that will return the text character instead of the 
colors. The formula given on page B7 of the Applesoft manual is: 

DHRB [SCRN [x-1 , 2 * (y-1 ] + 1 6 * SCRN [x-1 , 2 * fy-1 1 + I ] ] 
...which will return the character at position [x.y]. 

In this program, a "window" has been used which causes this for- 
mula to give an incorrect value because it is looking at the wrong spot 
on the screen. The x value must be incremented by 1 [line 51 0] before 
passing the value to this subroutine [lines 10-20]. I've removed the 
L.HHS function because I'm using PEEKed keyboard values Here is 
what the program does: 

A. Check the Screen. Has the bomb hit anything? 
1 Empty space. . .continue on. . , line 520 . 

2. A " ! "...hit a missile I... line 530. 

3. Hashing Slashes. ..hit the bunkers.. .line 540. 

4. Oh no, too low! Hit the dirt!. ..line 550. 

5. Must have hit a tank!, ..lines 570-5BD. 

contirued on page 36 
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continued from pag e 35... 

So... The battle goes on. 

CC is probably just the first computer magazine to censor 
HARDCORE'S ads. We plan to try to put one in Call A.P.P.L.E., but 
unless Val Golding, the editor, has altered his policy, they will pro- 
bably refuse to run our ad, too. 

We'll keep you posted on further developments. 

Addendum: Call A.P.P.L.E. didn't run our ad, but we 
learned from Grawin Publications that it wasn't Val 
who had our ad pulled from its pages at the last mo- 
ment. It was the doing of Dick Hubert, President of 
Call A.P.P.L.E., and its Executive Director. 

Anyway, on to the letter (parenthesis bv bev.}: 

Dear Editor, 

You quoted me correctly (in the update and aler t), 
and for that 1 am grateful. I do not feel that you 
quoted me in context, for example, my "lame excuse" 
that Reader's Digest refused liquor ads came at a 
point in our conversation when we were discussing the 
fact that the courts have allowed publishers the right 
to set their own standards for accepting advertising. 
I invite you to practice what you preach. If soft- 
ware prices are extortionate, how do you justify $20 
a year for your few miserable pages of hard-to-read 
mimeographed text? for the same price, your readers 
could buy over 2bOO pages of Apple material printed in 
Creative Computing- or even over 400 pages of Apple 
material if you want to throw away all our ads, gener- 
al articles, and material on other computers! 

The truth is most current software companies are 
not profitable. We know; we keep getting bankruptcy 
notices instead of payment for advertisements, even 
from established firms. And it is casual copying, not 
professional pirates, that hurts profits most. In my 
own case, I no longer write programs for publication; 
it is much more profitable to write custom software. 

Sincerely yours, 
George Blank, 

Editor, Creative Computing 

Dear Sir, 

I received the first issue of HARDCORE in the 
mail a few days ago and am quite pleased. I hope that 
you get as big as BYTE and do not degenerate into a 
game oriented publication. 

There are a few comments that 1 want to make 
about some of the articles and editorial columns. 
First, let me say that I, too, have felt the need for 
a magazine such as HARDCORE. The main reason I sub- 
scribe to a computer magazines is for the useful pro- 
gramming tips that I can pick up. When the tips stop, 

continued on page 39 
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TEXT INVADERS: LISTING continued from page 37 



B. Whatever the bomb has hit, let it be destroyed.. .Here I've 
tried to include various modes of destruction in order to show the 
assortment available. 

1. The tank goes boom [1 320D-1 3290] I This is the 
most complicated destruction scene except for the way the invaders 
will die [more on that in step 51, 

2. The bunker goes zap [850-8901! This scene simply 
buzzes while flashing from inverse to nnrmal a few times. 

3. The bomb hits the ground! This does a short buzz end 
leaves a crater after the screen flashes back and forth from text page 
1 to text page 2. 

4. Your missile gets hit! The two vanish in a noisy incan- 
descence of slashes, "l"s and dashes... 

Finally, go ahead and type in lines 20000-20090 preparatory to 
step 5. Now RUN and Debug. When it is running correctly, no error 
statements should erise. ancf the bombs should be dropping one by 
one. The tank should self-destruct only when hit by a bomb, then the 
large number on the lower left of the screen should change. To test 
these numbers, try to get the tank destroyed as many times as you 
can. 



<««««««5TEP 4»»»»»»»»»» 

ESSE BE SEES SIS ES EBKSJSBEJH a SSS BE be Mm SJEEEE s: BE be 

Get ftSCII of SCRN 

1« XXKEYX * XX - is YYKEYX - 2 * 

<YX - 1) 
m XKEY% « SCRN < XXKEYX, YYKEYX > * 

16 * SCRN ( XXX, YYX + 1 )s RETURN 

BaBS=BB = «=»*ES = a=EBES=tES = BSSB3:S=!*1= = BB;S = = =t = 

Has Invader Bonb Hit Anything 

500 IF IHRAYX = I THEN 900 
510 IVRAYX * IVRAYX + %i XX = IHRAYX 
+ It Y% = IVRAYX i GOSUB 10 

( Enp ty Space) 

520 IF XKEYX = 160 THEN 700 

< « > 

536 IF XKEYX - 161 THEN 800 

( bunker ) 



540 IF XKEYX # 92 OR XKEYX = 111 
THEN 850 

550 IF IVRAYX > 17 THEN 750 

570 INVERSE ! GOSUB 13200! POHERX » 

POHERX - is IF POHERX ■ THEN 

21000 
580 VTAB VGUNX - 2= HTAB IHRAYX: 

IHRftYX m 0: PRINT " *| 
590 GOSUB 4005 RETURN 



Condense Invader STR* 






660 



670 



690 



-« Condense Right Side >> 

IF MID* (INVftDER*U>, LEN 
(INVADER*<1)) - 2,1) = " " THEN 
FOR ftft = TO 2= INVADER*(AA) ■ 
LEFT* (INVADER*(AA), LEN (INVADER* 
<ftA>) - 4): NEXT AA: IF LEN 
(INVADER*<1)) > 4 THEN GOTO 660 

■-« Condense Left Side » 

IF MID* (INVADER$(1),4,1) = " '* 
THEN FOR AA » TO 2:INVADER*(AA) 
■ " " + RIGHT* ( INVADER* (AA), LEN 
<INVftDER*(fiA)) - 5)s NEXT AA: 
HINVADERX = HINVADERX + A: IF LEN 
(INVADER*U)) > 4 THEN 678 
RETURN 






Print Invader Bowb 



700 VTAB IVRAYXi HTftB IHRAYX: PRINT 
"+"»: VTAB IVRAYX - it HTAB 
IHRAYX: PRINT " "?: RETURN 



BoMb Hits BottoM 



750 



770 



780 



790 



VTAB IVRAYX - is HTAB IHRAYX! 
PRINT " ";* FOR T = 1 TO 5 
POKE -16299,0: INVERSE : VTAB 
IVRAYX* HTAB IHRAYX: PRINT " A,, :s 
GOSUB 1530: POKE -16300,0 
NORMAL : HTAB IHRAYX: PRINT CHR* 
< 223) ii GOSUB 1530 
NEXT Ti IHRAYX = 0s RETURN 

3BSSBB3SS = SBtSSBS=3BC:=! = B3!S5 3:BE=a = = = B = == = S:;; 

Bottb Hits Tank's Ray 

:ESEE=E=z::xs£=ssE=sa=xs: 



800 



810 



FOR BOOM ■ 1 TO 10: ZZ ■ PEEK 
(NOISE) 

VTAB TVRAYX - is HTftB THRftYX - 1.8 
PRINT CHR* (220)? "I/"?: VTAB 
TVRAYXs HTAB THRAYX: PRINT 
»~e# k -»5S yTAB TVRAY: HTftB THRAY: 
PRINT "/I"? chr* (220);: ZZ m PEEK 
(NOISE) 
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820 VTftB TVRAYX - H HTAB THRAYX - t* 
PRINT " ";: VTAB TVRftY: HTAB 
THRflYl PRINT " ";s VTAB TVRAY: 
HTAB THRAY: PRINT " "u NEXT 
BOOH 

63d FOR ft - 1 TO lQtZI *. PEEK (NOISE) J 
VTftB TVRAYX: HTAB THRAYZs PRINT 
"»"H FOR B = 1 TO 5: NEXT Bi HTftB 
THRAYX: PRINT " *M NEXT ft 

B40 TVRftY X * 0= THRAYX = 0* IVRAYX * 
O: IHRAYX » 8: RETURN 

Bonb Hits Bunker 



:sBBcc=ni:====s=E3cas=£i 






850 FOR T - 1 TO 6: VTftB IVRAYX - %4 

HTftB IHRAYX! INVERSE : PRINT : 

VTAB IVRAYX: HTAB IHRAYX: PRINT 
"X"?: G05UB 1530 

860 VTAB IVRAYX - ii HTAB IHRAYX: 

NORMAL s PRINT " "»s VTAB IVRAYX: 
HTAB IHRAYX: PRINT " "!: GOSUB 
1530: NEXT 

880 IHRAYX m 

870 RETURN 

Invader *& Drop Their Bonbs 



90O 



905 

910 
915 

920 

930 

935 

940 
945 



— « Pick a random invader- » — 

RX m RNB (1) * NX: RflNX = RX * 
4 + 3: IF LEN (INVABER*a) ) < 5 
THEN VTAB VINVABERX: HTAB i: CALL 

- 868« VTftB VINVABERX + U CALL 

- 8681 RETURN 

IF RflNX > LEN UNVABER*<1>> THEN 

RETURN 

IF RANX < THEN RANX # - RANX 

TEMP* = HIB* (INVABER*(1),RANX + 

U i> 

TEMPX * VAL (TEMP*): IF TEMP* * 
" " THEN 900 

IF TEMPX > 9 THEN TEMPX ■ TEMPX / 
10: GOTO 930 

IF SSX THEN IF TEMPX < * POHERX 
THEN TEMPX = 1 



-« Decrement Invader » 

TEMPX = TEMPX - 1: TEMP* = STR* 
UEMPX): IF TEMPX < 1 THEN TEMP* 

_ ll 11 

IF 5SX THEN 960 



continued on page 40 
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continued from page 37 

my subscription payments also stop. I am glad that I 
saw your ad in SOFTALK. 

On using the "reverse" side of disks; 1 under- 
stand that some disk drives use the top side while 
others, like the Apple Disk II, use the underside. 
How can the disk manufaturer know whick side to have 
as the "good" side if this is true? 

1 have about 200 disks — all of them have been 
recorded on both sides. In three years I have not had 
any problems develop because both sides were recorded. 
Most of my disks are Verbatim, but I also have Georgia 
Magnetics, Memoriex, 3M, Apple, and one or two other 
brands, and non-brands. The only disks that I have 
had any real problems with are the new Verbatim Data- 
life. Three or four of the last 20 did not want to 
INITialize with the 16-sector format. I kept getting 
an I/O ERROR when the process was almost complete. 
This was on the "good" side, too. The way I get a- 
round this problem is to try again with 13-sector, and 
if that does not work, I try the DAKIN5 disk copy pro- 
gram or the 13-sector LAWRENCE HALL disk copy program. 
One of these methods has always worked — so far. 
Once INIfialized, however, the disks have not given 
any more trouble — so far. 

Instead of cutting notches in all the disk covers 
to allow the second side to be written to, I have dis- 
abled the microswitch sensor in one of my three drives. 
All that was necessary to do this was: 

1. remove the drive's case, 

2. loosen the two mounting screws holding the 



switch, 
3. 

ivated, 
4. 



Swing the switch down so it will never be act- 



retighten the screws and 

5. replace the drive's cover. 

It all took about ten minutes. I am reluctant to 
go along with the nay-sayers from a disk manufacturer 
even though they may have some good points. If every- 
one used both sides of every disk they would sell only 
half as many disks. 

I have both Locksmith and Copy II Plus. Locksmith 
has been giving me good results, albeit very slowly. 
Copy II Plus has given almost no results — quickly. 
I am waiting for my copy of the updated version and 
hope that it will work better. 

The Disk-O-Doc program from M.D. Software has 
all the features of a nibble copier except it is man-» 
ually operated. They have an ad in Softalk. So far I 
have not had any luck using the program to copy any- 
thing from one disk to another. I am sure that the 
instructions are clear to the person who wrote them, 
but they seem vague to me. It would be a big help 
if there were some step-by-step examples. 

continued on page 55 
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TEXT INVADERS: LISTING continued from page 39 



« Establish Bo«b » 

950 IVRAYX = VINVADERX * 2: IHRAYX = 
RANX + HINVADERXs GOSUB 7W« VTAB 
VINVADERX: HTAB IHRAYX: INVERSE : 
PRINT TEMP*;: NORMAL 

960 SSX * 8 

« Establish New Invader STR* > 

978 INVADER* (!) = LEFT* UNVADER*<1> , 
RANX) + TEMP* + RIGHT* ( INVADER* 
(1), LEN <INVABER*(1> ) ~ RANX 
- 1) 

988 IF TEMP* - " " THEN FOR AA ■ 8 TO 
2=INVADER*<AA) = LEFT* (INVADER* 
(AAJ,RANX - I) + " " + MID* 
( INVADER* <AA),RANX +3): NEXT AA 

990 GOTO 660 



Gun Destruction Sequence 



13280 



13218 



13228 



13238 



13248 

13258 

13268 
13298 



INVERSE : GOSUB 220: GOSUB 
13298: VTAB IVRAYXt HTAB IHRAYX! 
PRINT "."!; GOSUB 13298= NORMAL) 
GOSUB 228 

VTAB VGUNX : HTAB HGUNX - 2= 
PRINT "=:#:=";: GOSUB 13298: 
VTAB VGUNX - M HTAB HGUNX: 
PRINT >v ""-t GOSUB 13298 
VTAB VGUNXs HTAB HGUNX - 2= 
PRINT "- * -""'• GOSUB 13298 = 
VTAB VGUNX - U HTAB HGUNX: 
PRINT "."5: GOSUB 13298 
VTAB VGUNX: HTAB HGUNX - 2: 
PRINT " ~ ">: GOSUB 13298: 
VTAB VGUNX ~ U HTAB HGUNX: 
PRINT " ";: GOSUB 13290 
VTAB VGUNX: HTAB HGUNX - 2= 
PRINT " "" GOSUB 13298 
FOR E = 1 TO 188: NEXT E 
HGUNX =19: GOSUB 480s RETURN 
FOR E = 1 TO 10: BUZZ = PEEK 
(NOISE)! NEXT Es RETURN 



i=m^:Et:s:^:==;- 



Increment Skill fe Lower Invaders 



S K = =:iS = S55 35= SX = 3 " - 



28880 
20018 



28028 

20830 
28098 



AGAINX » AGAINX + 1 

VTAB VINVADERX: HTAB l: CALL 

- 868= VTAB VINVADERX * U HTAB 

l: CALL ™ 868 

VINVADERX ■ SKILLX + AGAINX: 

HINVADERX = 3: I TRAVEL* - 1 

GOSUB 13008 

GOTO 1080 



Other Lines 



1048 GOSUB 508 = REM <MOVE BOMBS> 

5 the tank strikes back 

If all is going well, key in step 5: Self Defense. This will finally let you 
shoot back at the invaders. 

Like the search routine used to find out if the bombs hit anything, 
the missite search routine also uses the SCRN function in lines 1 D and 
SO. 

A. Did you shoot [line 1 50)? And if so. did you hit anything? 
[Line 1 050 takes us to lines 50 thru 90] 

1 . Hit nothing. ..so go on [line 55] 

2. Hit your own bunker... [line 60] 

3. Hit a bomb., [line 65] 
4 Hit an invader.. 

a. on the left side [75] so destroy it from the left side 
[610], 

b. On the right side [80] so destroy it from the right 
side [620]. 

c. In the middle [B5] so destroy it from the middle 
[630]. 

5. Hit the top of the playing area... [line 90]. 

Thst's it. Debug, and enjoy. 



XSTEP 3»»»»: 



* > > ?? ? 






Erase/Recreate Missile 



30 VTAB TVRAYX: HTAB THRAYX: PRINT 

" ";: RETURN 
35 VTAB TVRAYX: HTAB THRAYX: PRINT 

"I";: RETURN 

Create New Missile 



40 IF TVRAYX > THEN GOSUB 90: 
HTAB THRAYX: PRINT " "; 

45 THRAYX = HGUNX : TVRAYX * VGUNX 
GOSUB 35= RETURN 

Has Missile Hit Anything? 



58 IF TVRAYX < 1 THEN RETURN 

52 COSUB 30: TVRAYX * TVRAYX - jp 

GOSUB 35= IF VVRAYX < 5 THEN 

GOTO 98 
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t Hit Nothing > 

55 XX * THRAYX + UYX « 

GOSUB 10: IF XKEYX = 

RETURN 



TVRAYX - H 
160 1HEN 



66 



-( Hit Bunkers ) • 

IF XKEYX < 127 THEN FOR A = 1 TO 
5s GOSUB 3«s GOSUB 1530: GOSUB 35s 
GOSUB 13363 GOSUB 36= GOSUB 1530: 
NEXT ft: TVRAYX = TVRAYX - 1: GOSUB 
30! TVRAYX = 6! RETURN 



( Hit A BOMt' )— - : 

65 IF XKX * 171 THEN 800 



( Can Missile Hit Invader-'? ) 

70 IF TVX < > VIX 4 1 THEN RETURN 
72 SSX = i 

( Hit Invader on Left Side ) 

75 IF XKEYX = 221 THEN GOSUB 600s 
RANX o XX - HINVADERX: GOTO 910 

< Hit Invader- on Right Side > 

66 IF XKX = 219 THEN GOSUB 620s RANX 
= XX - HINVADERX - 2: GOTO 910 

( Hit Invader in Center ) 

85 GOSUB 610! RANX = XX - HINVADERX - 
Is GOTO 916 



35=E£: 






Missile Hits Top of Screen 



90 VTAB TVRAYXs HTAB THRAYX: PRINT 

" "!» VTAB TVRAYX - i; HTAB THRfiYX: 
PRINT "*">;3 FOR A = 1 TO 7: BUZZ m 
PEEK (NOISE): NEXT A: HTAB THRAYX: 
PRINT "."?: TVRAYX - 6: RETURN 

ats aojssc c« MtiSiSje s:az am =sssssna sr= = «s =ss= BBS s= =.-= = bos a 



^E^rsescsss 



Invaders Destroyed 



-Hit on right side- 



600 FOR A = TO 2: VTAB VINVADERX 

+ l: HTAB XX - 1.1 GOSUB 630: VTAB 
VINVADERX: HTAB XX - 1: GOSUB 
630: HTAB XX: GOSUB 630-' HTAB XX 
+ l: GOSUB 630: VTAB VINVADERX 
+ 1.8 HTAB XX + 1: GOSUB 630: HTAB 
XX s GOSUB 630: NEXT 

605 BPTSX = 0: GOSUB 1600: GOTO 640 



, ^m on i ®f t side 

610 FOR ft M TO 2: VTAB VINVADERX: 
HTAB XX - H GOSUB 630s HTAB XX 

- 2: GOSUB 630: HTAB XX : GOSUB 
630: VTAB VINVADERX * is HTAB XX 

- 2: GOSUB 630: HTAB XX: GOSUB 
630: HTAB XX - 1: GOSUB 630: NEXT 

615 BPTSX * 10: GOSUB 1600= GOTO 640 

Hit snack in the Middle 

620 FOR A = TO 2: HTAB VINVADERX 

+ i: HTAB XX - Jj GOSUB 630: VTAB 
VINVADERX: HTAB XX - 1: GOSUB 630: 
HTAB XX - 2: GOSUB 630: HTAB XX 

- 3: GOSUB 630: VTAB VINVADERX 

+ l: HTAB XX - 3: GOSUB 630: HTAB 
XX - 2: GOSUB 630: NEXT 
625 BPTSX =■ 0: GOSUB 1600: GOTO 640 



Bissolve invaders 



630 PRINT ZAP*<A>s: X = PEEK (NOISE) 

* PEEK (NOISE): RETURN 
640 THRAYX * 0: TVRAYX = 0: GOTO 970 

Increetent Score 



1600 PTX * BPX * SKILLX + POWERX + PTX 
1610 VTAB 19s H'JAB 30: INVERSE: PRINT 
"5 5 HTAB 30= PRINT PTSXjS 
NORMAL : RETURN 



Other Lines 



110 IF DISPLAY* AND FSHOOTX < THEN 

KEYX ■ 160 
150 IF KEYX * 160 THEN AUX ■ i| GOSUB 

40 
1OS0 IF mm THEN GOSUB 50 



5 



~2.n1 



Oh, yes. ..improvements; 

I wouid want a few more rows of invaders, dropping a few more 
bombs. And I sure would like to shoot a whole screenful of missiles i ! ! 

I also used an applesoft compiler on it to make it really 2ip 
along. .And it did. . .too quickly. If you use the compiler on Text Invaders, 
I firmly suggest you slow down the invader's descent...! did. I made 
them randomly choose to move, or stand still, but still wiggling those 
skinny legs of theirs... that way you don't quite know which way they're 
going to go... 
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Certain tools are raqurea lu help you understand DOS and to allow you to manipulate your disk lies. 
The most important is the disk editing utility which you acquired in Volume 1 . Number L to tt«a column 
you will acquire another- of these tools and learn how to use it. This program is called: DiskVtew... 



Disk View is a mini "nibbles". A nibbler is a program that reads the 
raw nibbilized data from a disk without regard to disk format. 

This means that you can view data on a nonstandard format disk 
[copy-protected] as easily as from a normal DOS formatted disk 

With Disk View you can examine a nonstandard disk to see what 
was changed. Often these changes are minor and a similar change can 
be made to your DOS. This would allow you to use DiskEdit to read that 
disk. 

The format of DiskView is similar to DiskEdit A full screen of HEX 
bytes is displayed with the status prompts on the bottom of your 
screen. The buffer extends from £2000 to $4000 Hex which is large 
enough to insure reading in an entire track The slot, drive and track 
are selectable. Half -tracks can be accessed by appending a ". 5" to the 
track number. The commands are: 



D changs the drive 

L raad the last track {stops by half tracks] 

N raad tha next track (atapa by half tracks] 

P print seres n contents 

R read ths current trsck 

3 change tha slot 

T select a track or half track 

X exit to basic 

increment buffer 

decrement buffer 



Type in the program and save it to disk. Be especially careful with 
the data statements. When those vakjes are poked into memory they 
become a machine language subroutine that is the heart of the pro- 
gram. Run the program. When you see the flashing "CDMMAND" 
prompt, press the "H" key. The screen will fill with hex bytes. You are 
looking at the actual data stored on the disk. Head Disklocks for a 
better understanding of this nibbiiized data. 



List of variables 

BS CHRS (B) Backspace 
GS CHB9[7] Bell 

The remaining variables are locations in the machine subroutine. 



Poke slot times 16 
Poke slot times 16 
Poke driws number 
Poke track times two 
Call to print to screen 
Page position in buffer 
Cell to read trsck 
Poke number to print 
Call to print hex 
Default drive value 



S1% 


774 


S2% 


BOS 


DR% 


769 


TR% 


789 


MV% 


830 


CT% 


8S6 


I0% 


768 


NM% 


890 


HX% 


BBS 


Dfl 


1 
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CAUTION: This program is DOS dependent. It calfs directly 
into DOS in order to step the drive motor. You must have DOS 
3.3 and 48K of memory. This program can be used to read 13 
or 16 sector disks or any other Apple disk but it will only run 
under a 48K Apple 3.3 DOS. 



Disconnect DOS - GOTO Menu 



100 



10 TEXT : HOME : IN# : PR* : LOMEM 
: 16384 : POKE 1144,90 : GOTO 90 



***** 



Get kmy and return ***** 



20 KY*= PEEK ( - 16384) : IF KY* < 

128 THEN 20 
30 POKE - 16368,0 : RETURN 



***** 



Print 40 dashes 



40 FOR X * 1 TO 40 : PRINT "-"; : NEXT 
: RETURN 



Recalibrate drive 



***** 



50 GOSUB 60 : POKE 781,0 : POKE 1144, 
90 : POKE TR*,0 : CALL 10* ; POKE 
781,235 : POKE TRX.TK* : CALL 10* 
RETURN 



***«» 



Print proinpts and values ***** 



60 VTAB 23 : HTAB 2 : INVERSE : PRINT 
"SLOT"; : HTAB 10 ! PRINT "DRIVE"; 
: HTAB 19 : PRINT "TRACK"; : NORMAL 

70 VTAB 23 : HTAB 7 : PRINT PEEK (SIX) 
/ 16; : HTAB 16 : PRINT PEEK (DR*> 
- PEEK (SI*); : HTAB 25 : PRINT 
"B«B*B$B* PEEK (TRX) / 2 

80 RETURN 

***** Menu - normal entry at 100 ***** 
90 GOSUB 540 



110 
120 
130 
140 
150 
160 
170 
180 
190 
200 
210 
220 



IN* = PEEK <CT*> : VTAB 21 : HTAB 
32 : PRINT "PAGE "IN* - 31 : GOSUB 
60 : VTAB 23 : HTAB 30 : CALL 
- 868 : FLASH : PRINT ">C0MMAND<" 



: NORMAL 
IF KY* = 
IF KY* * 
IF KY* = 
IF KY* = 
IF KY* - 
IF KY* = 
IF KY* = 
IF KY* = 
IF KY* = 
IF KY* = 
IF KY* * 
GOTO 100 



: GOSUB 20 

210 THEN GOSUB 480 

211 THEN GOSUB 390 
216 THEN GOSUB 410 

212 THEN GOSUB 420 
199 THEN GOSUB 270 
196 THEN GOSUB 230 
208 THEN GOSUB 290 
136 THEN GOSUB 250 
149 THEN GOSUB 370 
204 THEN GOSUB 490 
206 THEN GOSUB 510 



***** Changs drive number ***** 

230 VTAB 23 ; HTAB 30 : INVERSE : 

PRINT G$"SET DRIVE"; : HTAB 10 ; 
FLASH : PRINT "DRIVE"; : NORMAL : 
HTAB 16 : PRINT " " CHR$ (8); : 
GET A* : DR * VAL <A$> : IF DR < 1 
OR DR > 2 THEN 230 

240 POKE DR* , PEEK (SI*) + DR : GOTO 
50 

***** Decrement buffer ***** 
250 IN* * IN* - 1 : IF IN* < 32 THEN 

IN* = 32 
260 POKE CT*,INX : CALL MV* : RETURN 

***** Toggle sound on and off ***** 

270 PRINT G$ : IF G* = CHR$ (7) THEN 
G« = "" : RETURN 
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DISKVIEW NIBBLER: LISTING continued 



280 IF 6* = '■■' THEN G$ = CHR$ (7» i 
RETURN 

***** Print screen contents ***** 

290 VTAB 23 : HTAB 30 : FLASH : PRINT 

G$">PRINTER<"; : NORMAL 
300 PR# 1 

310 BUFFERS = PEEK <CT*) * 256 
320 PRINT : PRINT "TRACK "TK* 
330 FOR X m TO 255 STEP 13 : FOR Y = 

TO 12 : POKE NMX, PEEK (BUFFER* 

+ X + Y> : CALL HX* : PRINT " " ; : 

NEXT Y : PRINT 
340 IF PEEK f - 16384) = 155 THEN 360 
350 NEXT X 
360 PR# : POKE - 16368,0 : RETURN 



Increment buffer 



***»« 



370 IN* * INS + 1 : IF IN* > 63 THEN 

IN* * 63 
380 POKE CT*,IN* : CALL MV* : RETURN 

***** Change slot number ***** 

390 VTAB 23 : HTAB 30 : INVERSE : 

PRINT GS"NEW SLOT?"; : HTAB 2 : 
FLASH : PRINT "SLOT"; : NORMAL : 
HTAB 7 : PRINT M " CHRt (8); : GET 
At : KY* = VAL (A*) : IF KYX < 1 
OR KY* > 7 THEN 390 

400 POKE S1*,KY* * 16 ; POKE S2*,KY* * 
16 : GOTO 240 



***«* 



«»**<• 



Exit to BASIC 
410 TEXT : HOME : CALL 1002 : END 
***** Change track value ***** 

420 CS *■*" : VTAB 23 ; HTAB 30 : 
INVERSE : PRINT "SET TRACK"; : 
HTAB 19 ; FLASH : PRINT GfTRACK"; 
: NORMAL : PRINT " " CHRt (8) 
CHRt (8) CHRt (8); ; GET AS : C$ = 
CS + AS : PRINT A$; : GET At : Ct 
= C$ + At : IF A$ * CHRS (13) THEN 
460 

430 PRINT At; 

440 ' GET AS : CS = Ct + AS : PRINT At; 

450 IF At * "," THEN GET AS : CS * CS 
+ AS : PRINT At; 

460 KY = VAL (CS) : IF KY < OR KY > 
35 THEN 420 

470 TK* m KY * 2 



Read current track 



•*•** 



480 POKE CT*,32 : VTAB 23 : HTAB 30 : 
FLASH : PRINT ">»READ<«"GS; : 
NORMAL i PRINT " "; : POKE TR*,TK* 
: GOSUB 70 : CALL 10* : GOTO 60 

***** Subtract .5 and read ***** 

490 TK* = TK* - 1 i IF TK* < THEN 

TK* = 71 
500 GOTO 480 

***** Add .5 to track and read ***** 



510 TK* » TK* + 1 

TK* = 
520 GOTO 480 



IF TK* > 71 THEN 



***** Poke machine subroutine ***** 
***** define variables & return ***** 

540 FOR X =» 768 TO 894 : READ X* : 
POKE X,X* : NEXT X 

550 DATA 162,97,189,137,192,162,96,189 
,137,192,160,5,169,255,32,168,252, 
136,16,248,169,0,32,160,185,189, 
142,192,169,0,133,30,169,32,133,31 
,162,96,160,0,189,140,192,16,251, 

560 DATA 145,30,230,30,208,245,230,31, 
165,31,201,64,144,237 189,136,192, 
169,1,133,37,32,34,252,169,0,133, 
36,133,30,169,13,133,31,162,1,32, 
74,249,166,30,189,0,32,32,218 

570 DATA 253,162,1,32,74,249,230,30, 
240,7,198,31,208,235,76,75,3,32, 
156,252,230,37,32,34,252,169,22, 
133,34,96,169,172,32,218,253,96 

580 SI* * 774 : S2* » 805 : DR* = 769 

: TR* = 789 ; MV* = 830 : CT* » 
856 : Bt * CHRS (8) : GS » CHRS 
(7) : 10* * 768 : NM* » 890 : HX* 
= 889 : DR « 1 

590 GOSUB 40 : VTAB 8 : HTAB 10 : 

PRINT "COPYRIGHT 1981 (C) H : PRINT 

: HTAB 10 : PRINT 

"ALL RIGHTS RESERVED" : PRINT: HTAB 

10 : PRINT "HARDCORE COMPUTING" : 

PRINT : HTAB 10 : PRINT 

"P.O. BOX 44549" : PRINT : HTAB 10 

: PRINT "TACOMA, HA 98444" 

600 VTAB 22 : GOSUB 40 : GOTO 60 
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hardware solutions 



figure 1 




figure 2 

Your Apple Motherboard showing the 
the ROM to replace. 
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hi} ariarlas r. ftsight 

Many of you with the A— 11+ complained that you couldn't use 

Bobby's SOFTKEYs because you didn't have access to the Integer 
Firmware card. W?11 T here's one solution..., 

curing those auto-start ROM blues 

The autostart ROM in the Apple JI+ is a blessing. The autostart feature allows program- 
mers to create a Turnkey System. The user need only insert a program disk and switch on the 
computer. The monitor ROM will automatically cause the disk to BOOT and the program will 
be up and running. The reset switch can be locked out. An un knowledgeable user cannot 
accidentally crash the program. This is great for computer users who have no need or desire 
to learn about computers. 

But, for the hobbiest or businessman who is trying to modify lines or fix a bug in a pro- 
gram, the autostart ROM will make your life miserable. It is all but impossible to stop a run- 
ning program. 

One solution is to not purchase software that cannot be modified. 

Another solution is to purchase an Integer Firmware Card. (The old 
F-8 monitor ROM doesn't have the autostart feature.) The price for this 
can range from $100 to $200, depending on whether you purchase it 
new or used. 

A less expensive solution is to purchase just the F-8 monitor ROM tor 
an Apple II from your Apple dealer and replace the autostart ROM in 
your Apple II + whenever you need to do program modifications. 

The procedure is simple. However, care should be exercised because 
the pins on the Integrated Circuit (IC), chips are easily bent. If you 
decide to do this then read all the instructions before you start. 

CAUTION: This will probably void your warranty if your dealer finds 
out. 

1. Turn off the power to your computer. Remove the cord to be sure. 

2. Open the top cover and set it aside. 

3. Touch the metal power supply case to discharge any static from 
your body. (The power supply is the large box on the left side.) 

4. Locate the F-8 ROM (see fig. 2). Using a small flat screwdriver (the 
kind your wife gets with her sewing machine) carefully pry up one end of 
the IC about 1/1 6th of an inch. 

CAUTION: Be sure you are prying up on the I C chip and not on the 
socket, (see fig. 1) 

5. Gently pry up the other end of the IC about l/16th of an inch, 

6. Repeat steps 4 and 5 until the IC is free. 

7. Set the chip aside in a safe place. (If the F-8 ROM that you bought 
came with a case, then use that.) 

REMEMBER: Static is your worst enemy. Handle the chip as little as 
possible. 

8. Pick up the chip that you purchased and examine it. One end will 
have a notch. The chip must be inserted with the notched end pointing 
toward the keyboard. 

CAUTION: Inserting the chip in the socket backwards will fry it and 
may damage other components on the motherboard. 

9. Insert the chip in the socket. You can pre-align the pins on the chip 
by pressing them upon a flat surface. Be gentle and use even pressure. 
Insure that the chip is fully seated on its socket. 

10. Replace the top cover and reconnect the power cord. 

11. Turn on your computer. Your Apple II+- will now emulate an 
Apple II cold start. When you see the asterisk prompt, type: 

6 ctrl P return 

It will BOOT a disk in slot 6. 

Follow these same steps when you wish to reinstall the autostart 
ROM. 



II 
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ftij lash fisrujitf 

This is the beginning of a column which will be devoted to the 
description and use of the high-resolution graphics capabilities of the 
Apple computer. 



Wi 



T'SW 



When 1 first began to took into the world of home computers a 
couple of years ago, one of the first things which struck me as 
extremely interesting was the graphics capabilities of this Apple com- 
puter. I was fascinated by the demonstration of Apple vision with the 
little man dancing a jig to the tune of "Turkey in the Straw." 

However I soon learned, after unpacking my 1 6K Integer Apple II 
that high-resolution graphics was not only beyond the cepability of my 
meager knowledge of computer programming but, for the present, 
was also beyond the capability of my computer's configuration. So as 
soon as possible I purchased the Programers Aid 1 which game me 
high-resolution graphics capabilities. 

Here began a love/hate relationship with my computer which has 
lasted until the present. A love for what this fantastic machine can do 
and a hate for the realization of how much I did not know and how much 
I would have to learn in order to accomplish the goals which I had set for 
myself in respect to my ability to manipulate this computer's graphics 
capabilities to my ends. 

I still am a long way from my goals mainly due to various distrac- 
tions which seem to crop up along the way, [like sunny summer 
weather which makes sitting at a keyboard seem somewhat out of 
piece]. But I have managed to learn a few tricks along the way which 
might possibly be of use to those many people who. like myself, are 
fascinated by Apple's graphics. 

This first installment will introduce you to the accompanina pro- 
gram which I call "artist's Easel". It is a fun drawing program which 
allows you to draw lines, boxes, solid rectangles, circles, and more. 



This program is a compilation of several of the routines which I 
developed through my first trials in graphics use and began to incor- 
porate into one drawing utility. Soon I had developed what seemed to 
be a useful set of routines and linked them together with a menu and 
disk access and error handling. 

The main control of drawing is accomplished through use of the 
game paddles to move a 'cursor' to any position on the screen and 
from there select lines, circles, etc. A little experimenting will help you 
to get the full benefit from this program. As I have tried to make it as 
foolproof as possible, feel free to try anything. 

By using the T' key you can see the available commands, and the 
'F' key will allow you to see the full screen (without the coordinates] or 
switch back to mixed text and graphics. 

In future columns I will explain some of the subroutines which I have 
used in this program and how they can be tied most effectively 
together in your programs 

Also, as we progress through the use of hi-res graphics. I will try 
to develop other useful routines which can be incorporated into this 
program. 

Next issue I will give a quick overview of the organization of the 
graphics screens and how to get to them from both Applesoft and the 
monitor. 

In the meantime, explore this program and try to understand each 
subroutine's function end expand your hi-res horizons. 

happy drawing. 



Hove cursor with paddles. 

To end or save picture, type Z. 

COKNAHDS FOR ARTIST'S EASEL 



H 
8 

C 
G 
E 
F 
I 
L 
P 
R 
S 



CTRL 
Ul'RL 
CTRL 
CTRL 



position CR,B> 

box from ft,B i upper left,) to 

X,V (lower rights. 
change color, 
draw points with keys, 
erase C or CTRL E > 
fui i''«t lxed screen switch 
inverse screen. 
draw line from K,V to ft,B. 
draw points with paddles. 
draw circle with center at cursor 
shade frow fi,B to X,Y (see E >. 
switch back to draw mode, 
white <or CTRL W>. 
end^set color to background at 
cursor. 

E see E 

L draw line but ft,B unchanged. 

R draw circle below cursor. 

W see W 



15 REM CGPVRIGHT FEB 1388 

IS REM BV JftCK HEWITT 

m REM ftLL RIGHTS RESERUED 

23 LOHEM: 163S4: GOSUB 10806 

25 GOTO 108 

50 X - INT < PDL Km * 1.835): 

V = INT i PDL CI J * .75) 
68 XDRfiW 1 fiT X,V: RETURN 

*************************************** 

180 TEXT : POKE - 16388,8: GOTO 1888 

I>S GOSUB 5858: POKE - 16384,8: POKE 

- 16237,8: POKE 34,21: HOME: GOTO 

1358 
280 UTHB 22: PRINT "X= ";X;" 
258 UTflB 23: PRINT "V= 'VtV* 
275 RETURN 

J-************************************** 
388 UTRB 22: HTA6 11: PRINT "C0LGR= "; 

CQ$C CO > 
6m iF TT = j THEt .j umB 23: HlftB 3: 

PRINT ' 
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5 

easel 

fash 
'iHiili 




400 
458 

58a 

550 



688 

b5u 

675 
768 



IF DO < > I THEN UTfiB 22: HTfiB 

38: PRINT M fi= " ifii " 

IF m i > 1 THEN UTfiB 23: HTfiB 

38: PRINT "B= ";Bj" 

IF CS = 1 THEN UTfiB 21: PRINT 

RIGHT** S*,37> 

U-' DO = 1 THEN UTfiB 21: PRINT 

RI6HT$<S$,20>; H US£ KEVS-": UTfiB 

21: HTfiB 38: PRINT "ONE": UTfiB 

22: HTfiB 38: PRINT "fl D ": UTfiB 

23: HTfiB 38: PRINT "ZXC 

IF BD = 1 THEN UTfiB 23: HTfiB 11: 

PRINT "P-RETURN 

IF PP * 1 THEN UTfiB 23: HTfiB 11: 

PRINT "fiNV KEV ESCfiPES" 

KFLfiG = 8 

RETURN 



*************************************** 
758 X = INT < PDL <8> * 1.835 >: 

V = INT ( PDL U> * .#$:■) 
888 RETURN 

■Si***************** ******************** 

1888 ONERR GOTO 3258 

1848 80SUB 7508 

1858 GOSUB 7800: GOSUB 5B58: BOSUB 

1688 
125W GOSUB 1618: POKE 34,21: HONE 
1358 GOSUB 58 

14U8 FOR T = 1 I'D 10: NEXT : GOSUB 68 
1458 K = PEEK i - 1S384>: IF K > 127 

THEN BOSUB 2858 
1588 TT = 1:CS = I: GOSUB 288 
1525 IF KFLfiG THEN GOSUB 388 
1558 GOSUB 58: GOTO 1488 



*************************************** 

Init & Uariables 
*************************************** 

ibtfO HGR :C0 = 3: HCOLOR= CO: RETURN 
1618 DIN C0$<7): CO*<0> = "BLACK ": 
CO$a> = "GREEN "s C0*<2) - 
"UIOLET": C0*<3> = "HHITE ": 
C0$<4> - C0*t8;: C0*(5> ■ 
"RED ":C0*<6> = "BLUE " 
1828 00*<7> * CG*<3> 



*************************************** 

Init Exis screen 
-in************************************* 



1650 

1675 
1788 

1 750 



1888 
1858 



CO = 3: TS ^ 1: FS - 8: HCOLOR 

= 3: POKE 216,8: ER * 1 

POKE - 16301,0 

POKE 232,0: POKE 233,3 

POKE 768,1: POKE 763,0: POKE 

778,4: POKE 771,8: POKE 772,197: 

POKE 773,6: POKE 774,0 

ROT= 24: SCRLE= 3 

RETURN 



*************************************** 

Draw Points Nith Keys 
*************************************** 

2850 00 = 1: TT = 8: OS = 8: 

GOSUB 288 
2875 IF KFLfiG THEN GOSUB 388 
2188 DD = 8 

2150 KB = PEEK C - 16384) 
2288 POKE - 16363,8 



HARDCORE 2.0 



P.O. Box <)45-'.9 Tacona, HA 98H4 page 47 



ARTIST'S EASEL: LISTING continued 



2358 
2458 



2558 

2688 

265B 

2668 
2665 
2675 
2677 
2760 
2^58 

2808 



IF KB * 20S THEM 

V * V - 1 

IF KB = 133 THEN 
IF KB * 213 THEN 

V = V + 1 

IF KB =* 216 THEN 
IF KB = 215 THEN 
IF KB - 137 THEN 

V = V 



X = X - 



X - 

V ~ 

V = 
X = 



X 

y 
v 

X 



1: 

1 
1; 

1 
1 
l: 



1 
1: 



IF KB = 136 THEN X = X 

IF KB = 135 THEN X = X 

V = V + 1 

IF KB - 208 THEN KFLflG = 1: 

RETURN 

IF V > 131 THEN V = 131 

IF V < 8 THEN V = 8 

IF X < THEN X = 8 

IF X > 273 THEN X = 273 

HPLDT X,V 

IF KB = 138 THEN POKE - 16302 + 

FS,8: FS = RBS <FS - 1> 

60T0 2858 



*************************************** 

'R" - Draw Circle With Inputed Scale 
*************************************** 

&ffi UTNB 21: INPUT "DRttH CIRCLE-NHfiT 

3625 IF SC < 1 OR 3C > 35 THfcN PRINT 

3*: GOTO 3688 
3638 IF X - INT <SC / 2> < OR V - 

INT ^2.5 * 66 > < 8 THEN OTflB Sis 

PRINT "OFF SCREEN TRV A68IN 

: FOR = 1 TO 1888: NEXT: 

RETURN 
3658 SCftLE= SC: IF Rl THEN 3675 
3665 HPLOT X - INT ( SC / 2>,V: GOTO 

3708 
3675 HPLOT X - INT < SC / 2>,V - INT 

< 2. 5 * SC) 
3780 POKE 772,5: POKE 773,0 
3758 FOR R = TO 64 STEP 4: ROT = R: 

ORPIN 1: NEXT 
3350 POKE 772,137: POKE 773,6: SCWLE = 

8: ROT = 24: RETURN 



*************************************** 

Interpret - execute keyboard commands 

*************************************** 



2650 

2875 
2300 
2325 

2358 

2375 

3880 

3858 
3188 

3125 

3158 
3288 

3258 



POKE - 16368,8: 
a - X: B = V 

KFLftS - 1 



IF K = 133 THEN 



3358 
3368 
3480 
3458 
3588 
3550 



IF K 
IF K 
X,V: 
IF K 
IF 
CO 
IF 
CO 
IF K 
IF 
CO 
IF 
CO 
IF K 
IF 



= 148 THEN HPLOT A,B TO X,V 

= 284 THEN HPLOT «,B TO 

ft = X: B = V 

* 208 THEN GOSUB 465© 
K = 133 THEN HCOLOR= 4: 
= 4 
K = 137 THEN HCOLOR= 8: 

■ 



281 
215 



THEN 
THEN 



CALL 778 
HCOLOR= 3: 



K = 

= 3 

K = 151 THEN HCOLOR= 7: 

= ? 



FS,0: FS = 

IF K = 212 

fS,8: IS a 

3388 IF K - 134 

X,B TO X,Y 



IF 
IF 

IF 



136 THEN GOSUB 2058 
K = 133 THEN POKE - 16382 + 
NBS i FS - 1 ) 
THEN POKE - 16304 f 

HBS MS - 1> 
THEN HPLOT fi,B TO 
TO H,V TO H,B 

210 THEN Rl - 1: GOSUB 3680 
146 THEN Rl = 8: GOSUB 3688 

211 THEN GOSUB 4508 
135 THEN GOSUB 4358 
213 THEN GOTO 4188 



K = 
K = 
K = 
IF K * 
IF K = 
RETURN 



*************************************** 

*W - Save Screen? or End? 
*************************************** 



4iyw 

4158 

4200 
4238 
4250 



4280 
4388 

4358 
4488 

4458 



POKE 



PRINT "S 



16381,8: HONE : UTHB 21: 
HUE THIS SCREEN <Y/N> "; 

INPUT m: IF LEFTS (MA > = »¥* 

THEN 4238 

GOTO 5588 

60SUB 5688: REN GET ORIUE# 

IF El THEN PRINT "SHOE fiS ";B$;: 

INPUT HS: IF LEFT* (fl*,l> = "V" 

THEN N$ * B*: GOTO 4308 

INPUT "WHAT FILE NaHE? *M 

POKE - 16382,8 

m = CHR* C4> 

PRINT D*> ,, BSfiUE ,, iN$i",a$2880, 

L$2088,B"*OR 

GOTO 5580 



*************************************** 

'S' - Shade Rectangles 
*************************************** 

4588 FOR 66 - a TO X 

4558 HPLOT BG,B TO BG,Y: NEXT 

46U8 RETURN 

*************************************** 

'P' - Draw Points Nith Paddles 
*************************************** 



4650 60SU6 ?58 
4700 TT = 8: PP = 1 : 



GOSUB 280 
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4?25 
4758 


IF KFLAG THEN GOSUB Wffi 

HPLOT X,Y 

PP = 

IF PEEK 4 - 16384; > 127 THEN 

RETURN 

GOTO 4850 




.''l-yu-i-i'.'-h-: 


4888 
4850 

4auy 







*************************************** 

-C- - Chanw Color 
*************************************** 

4850 POKE ~ 18301,0 

5000 UTAB 21: INPUT "COLOR ? 

(,0-E 1-8 2-U 3~H 5-0 6-B> B *CQ 

S«9I IF CO < 8 OR CO > ? THEN 4350 
5100 HCGLOR= CO: RETURN 

*************************************** 

End Or Continue Routine 
*************************************** 

55k!0 HONE : POKE - 16301,8: UTOB 21: 
INPUT "DO YOU REALLY WISH TO 

end ? H -*m 

5510 IF LEFTS (AM) < > "Y" THEN 

GOTO 1350 
5520 POKE - 16302,0: POKE 34,0: HOME: 

UTAB 18: PRINT "GOTO 175 TO 

REENTER WITH SCREEN INTACT": END 
5600 IF 02 THEN HTAB 6: PRINT 

"DRIVE # ">: INPUT OR* 
5G05 IF DR$ = "" THEN OR = 1: RETURN 
5610 OR = UAL <0R$): IF OR > 2 THEN 

5600 
5828 RETORN 

*************************************** 

Cowhands 
*************************************** 

i858 HOME: INVERSE 

530O PRINT "***** ARTISTES EASLE ***** 

**" 

5358 NORMAL 

6000 PRINT " *** BY JACK HEWITT ***" 

6O50 PRINT: FLASH 

6100 PRINT fc HOVE CURSOR HITH PADDLES" 

6125 PRINT: NORMAL 

6158 PRINT "N =NH1TE ( CR-CTRL N >* 

6200 PRINT "E =ERASE (OR-CTRL E > H 

6258 PRINT "C =CHANGE COLOR" 

6388 PRINT "F =SNITCH FULL^MIXED 

SCREEN" 

6325 INUERSE 

635tf PRINT "T -SNITCH BACK TO DRAM" 

6375 NORMAL 

6458 mim "0 =DRAW POINTS WITH KEYS" 

continued on page 50 
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original 
PRDGRflfTlS 



HardCore Computing would like to publish your 
original programs both in the magazine and on 
diskette for our readers. If you have such a 
program and would like to share it with the 
readers of HardCore, please ... 




"*/ 



1. GOTO page 59 and 

2. READ the section labeled 

3. REM PROGRAMS 

Do it for the notoriety. 
Do it for the $$$ 
Do it now! 
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ARTIST'S EASEL: LISTING continued from page 49 



6580 PRINT "P =DRRH POINTS NITH 

PADDLES" 
8525 PRINT "I =INUERSE SCREEN" 
6550 PRINT "ft =POSITION <A,B) 
6600 PRINT "L =DRAW LINE FROM K,V'TG 

'fl,B'" 
8650 PRINT "6 =GGX FROM ft,B<UL> TO 

6780 PRINT "S =SHftDE FROM ft,6 TO X,Y 

<SEE BOX) 
6750 PRINT "R ^CIRCLE NITH CENTER AT 

CURSOR" 
6/60 PRINT "CTRL R =CIRCLE BELON 

CURSOR" 
$?m PRINT "CTRL L =LINE BUT A,G NOT 

CHflNGED" 
6888 PRINT »2 =END-SET COLOR TO 8K6ND 

ftT CURSOR" 
6825 FLASH 
6858 PRINT g PRINT "■««* HIT ANY KEY TO 

BEGIN ***" 
6875 NORMAL 
6388 IF PEEK < - 16384; < 128 THEN 

6S0S: POKE - 16368,8: HOME 
6850 RETURN 

**********#*************#*********#**** 
Load Existing Screen? 

*************************************** 

7880 HOME : UTAB 10 

7858 PRINT "DO YOU WISH TO LOfiD AN 

EXISTING" 
718G PRINT "SCREEN Oft START A MEN 

ONE " 
nm PRINT "<N =NEH E ^EXISTING) "i 
7288 INPUT A$ 
^258 IF LEFT* CA*,1> < > "E" THEN 

RETURN 
7275 El - is 02 = 1: GOSUB 5808 
7388 PRINT "WHAT FILE NAME?": PRINT 

"<X-CftTALGG>": INPUT » %B$ 
7358 D* = CHR* <4> 
7375 IF 6$ * "C" THEN PRINT G$i 

"CATALOG": GOTO 7388 
r'488 PRINT D$i"BL0AD"jBS;",A8132,D";DR 
7450 POP: GOSUB 5850: POKE - 16384*0: 

POKE - 16237,0: POKE - 16300,8: 

POKE 238,32: GOTO 1258 

*************************************** 

Introduction 
*************************************** 

r'508 HOME: ER = 8: SPEED= 158 
7558 HTflB 18: PRINT "WELCOME TO: " 
^680 PRINT "*** ARTIST'S EftSLE ****": 
SPEED= 255 



7658 PRINT : PRINT 

7708 PRINT "NITH THIS PROGRAM YOU 

WILL BE": PRINT "ABLE TO CREATE 
PICTURES ON THE": PRINT "HIGH- 
RESOLUTION SCREEN." 

7758 PRINT « BY MOVING ft ' CURSOR' 
WITH THE": PRINT "GAME PftDDLES 
YOU CRN PLOT POINTS,": PRINT 
"DRftH LINES, BOXES, OR SOLID" 

7880 PRINT "RECTANGLES IN ALL OF 

APPLE'S": PRINT "HIRES COLORS." 

7S58 PRINT "THE POSITION KEY <A> WILL" 

7660 PRINT "ALLOW YOU TO PLOT THE ENG- 
POINT" 

,■8/0 PRINT "OF ft LINE OR THE UPPER 
LEFT AND" 

7868 PRINt "LONER-RIGHT CORNERS OF & 
BOX OR" 

.-'888 PRINT "ft SOLID. IN ADDITION 

YOU C«N": PRINT "DRftW CIRCLES OR 
DOODLE IN POINTS." 

7380 PRINT "THEN YOU CRN SftUE THE 
SCREEN TO": PRINT "DISK 
INSTANTLY. " 

7850 PRINT: FLASH 

8O00 PRINT "HIT ANY KEY TO CONTINUE" 

8010 NORMAL 

6050 IF PEEK < - 16384> < 128 THEN 
8050 

8108 POKE - 16368,8: RETURN 

*************************************** 

Error Handling Routine 
*************************************** 

8^50 IF ER = THEN PRINT " *** 
***** NOT FOUND ********" jG$: 
FOR = 1 TO 500: NEXT 

3278 GOTO 1858 

8308 IF ER = 1 THEN PRINT "ERROR"; 
Q$n FOR D = 1 TO 1800: NEXT: 
UTAB 22: PRINT RI6HT*<S*,38>: 
GOTO 1488 

********************************* ****** 
18808 FOR PK = 773 TO 306: REftD ID: 

POKE PK, 10: NEXT 
18018 DATA 183, 32, 133, 1, 163, 0, 

133, 0, 160, O, 177, 8, 73, 

127, 145, 0, 230, 0, 206, 246, 

230, 1 
10028 DATA 185,1,201,64,208,238,36 
10030 FOR A = 1 to 48: S$ = S* + " ": 

NEXT a 
10040 G$= CHR*<7> 
lki080 RETURN — 
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Graphic Software for Microcomputers 
by B. J. Korites, PhD 
©1981 by Kern Publications 

11" wide, 8" high, plastic spiral binding, soft- 
cover, 200 pages (printed or one side only) 

A better title would have been "HI-RES 
GRAPHICS FROM 1 TO 3-DIMENSIONS" 
because the author takes the reader from the 
simplest HPLOTs to the creation of 3-D images 
that you can stretch, squeeze, move, turn and 
even shade, remove the "hidden" lines and clip 
off lines that HPLOT beyond the screen limits. 

Written as a self -teaching guide for 
microcomputerists in general, this book should 
be of special interest to Apple-ites because all 
the programs are in Applesoft BASIC (for 48K 
AII + ). The programs are in the most elemen- 
tary format so that they can be translated more 
easily into other languages, the programs do 
not use most of the Apple's hires inherent 
subroutines such as: shape tables, DRAW, 
XDRAW, ROT, SCALE, nor does the author 
discuss hi-res coloring. 

The em phase, therefore, is not on the ac- 
tual program, but rather on the algorithm: the 
logic and math behind such techniques as 
perspective and 3-D rotations. 



w 



n 





Contents: 

1 Basic plotting commands 

2. Point drawings 

3. Line drawings 

4. 2D interactive graphics 

5. 2D translation 

6. 2D scaling and stretching 

7. 2D clipping 

8. 2D rotation 
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Using the 2D interactive graphics program. 



B. J. Korites, PhD 



9. 3D rotation 

10. 3D translation and rotation 

11. Perspective 

12. Hidden line removal 

13. Shading 

14. 3D shapes 

15. Matrix concatenations 

16. Graphic tablets 

17. Applications 

18. Practice problems 

The text comes with a floppy diskette of all 
the Applesoft programs listed and explained in 
the book. (Available on another diskette are the 
same programs in machine language.) The 
diskette comes with normal DOS 3.3 and is fill- 
ed to the brim with 61 little programs. 

Because the programs are written at such 
an elementary level, they are not error-safe and 
I've had to rerun some of the programs because 
of various annoying error messages ...... but as 

a vehicle for learning and as motivation to get 
you to write better software, the programs are 
great little teachers. 

Although it appears to be somewhat hastily 
put together (I noticed such little items as a 
SYNTAX ERROR message listed along with the 
program ....), the meat is there for the 
graphics student to devour. The author, B.J. 
Korites is the president of Data Dynamics, inc., 
and teaches a computer graphics course at 
Worcester Polytechnic Institute in 
Massachusetts. His book has been adopted as 
text by several universities. 
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There are many ways to write articles that Instruct readers in the basics of BASIC. One can simply write an article reveal- 
ing the functions of certain commands or give helpful programming hints. But I've found that the most helpful articles were 
those with actual programs. However, those programs were usually too complex for me to understand without a great deal of 
effort and time. 

This column presents simple programs written by beginners (the authors might not be in that category right now, but 
way-back-then.. .when it was written... they were just beginners). The program is generally bug -free and runs well...but is ripe 
for improvement... These programs fall into the realm of this column: My First 'Real' Program. 

If you have such a program, please submit it for publication along with an article describing the problems you had writing It 
and how you would write it now. 



To get this new column off the ground, I've taken a look st my own 
"first 'real' full length, debugged program". . .and I'm still a little surpris- 
ed. It wee written almost a year ago, so I'm surprised that it works as 
we* as it does. After all, I wrote it when I was in the earliest stages of 
learning BASIC. Of course, that fact clearly shows through. Just look 
at the listing: One statement per line ... 

[I've renumbered it because the original line numbers would have 
made it difficult for you to make alterations. And I've gotten rid of near- 
ly all of the CTRL G's scattered invisibly throughout the PRINT 
statements. Other than that, the listing is exactly as I wrote it a year 
ago.] 

Like all "first programs", it could use a tot of improvement. . .still, 
it's a colorful b-res two-player game that works well. And It was my 
"first" . . .and that makes it specie! . It meant that I knew how to use the 
Apple! And it meant that I had something to show for all the hours of 
tapping keys, ell the silent curses at the author[s] of the tutorial, and all 
the equally silent praises when I did something new end different, 
something that wasn't "in the book". Sure, I played with the bouncing 
"ball" routine, even altered it to see what it would do. But somehow. I 
felt that all the variations were still products derived directly from "the 
book". 

It began when my little niece came over and watched in fascination 
as the colors Bngled across the screen of the color T.V. that was nor- 
mally noisily displaying her favorite cartoons: bugs bunny, the road run- 
ner. I let her tap the keys. She was entranced. Being only 5 at the 
time, she was easily entranced, but her attention span was measured 
in breaths . Yet the computer held her attention . It combined two of her 
most favorite "toys": the electric typewriter [she filled pages and 
pages with her neme: A-M-B-E-R] and a color T.V. set! 

I mode a few simple programs that would interest her. However, 
because the alphabet was still something she was struggling to learn, 
most of the programs just prompted yawns after a while. Even the 
games on the master disk were too difficult for her [little brick out, 
etcj. 

Rnally, she cornered me and esked if I wanted to play tic-tac-toe. 
She had just discovered the simple logic embodied in that child's game 
and was excitedly trying to show every one... and usually that 
"everyone" was me. Being a writer, and working mostly at home, 
meant that your relatives had a tendency to use you as a convenient 
day-care center. Amber and I were using up an awful lot of my typing 
bond [she Wees to use clean sheets for each game]. And since 1 had 
resolved to let the computer do away with all my paperwork. . .and that 
included tic-tac-toe. ..the next step was clear, 

I went about using what little I knew to write a computer version of 
it. It's my guess that most of you have written your own version of this 
game in either text or lo-res. 

Between the constant interruptions of Amber's supervisory ques- 
tions, I completed it tD her delight. I made it noisy. It beeped and buzzed 
at every turn. It let her type her name. It responded with a "hello", but 
only to her name. To play, she needed to know only the numbers from 
"1 " to "9". And when she won [and she nearly always won when she 
played me] it noisily buzzed away. She lovad it: the color, the noise, and 
the fact that she hardly ever lost... 

At that time, I had just introduced myself, via the tutorial, to lo-res 
graphics, I had not even heard of hi-res yet Yet the hardest thing to 
write was the part that looked to see if anyone had won yet, and that 
had to be written first. As you see, the solution was simple. 

Why didn't I write one thet would actually play against Amber, 
computer v,s. human? After all, if I wanted her to win most of the time, 
all I had to do was use the RND function to make the computer's 



choice Perhaps now that she's older, she'll sit down and play the 
game by herself but, at the time, she played anything that someone 
else played. Human interaction was important. She would not play a 
machine, she had to play a person. Perhaps she had something 

there... 

Well, I called the game: Amber's T's.. 

The program appear's rather long but that is due to the enormous 
number of graphics involved. All the numbers as well as the "X" and 
"0" had to be HLINed, VLINed, and PLOTted. When these portions 
are taken into account, the program is quite reasonable, especially if 
you do a little compacting and eliminate extraneous line numbers. 

Personally, I'd write the program much differently today. Having 
learned to use the hi-res page, I think that if I were to write that tic-tac- 
toe game today. I'd have it drawn using a cube of 27 blocks, a cube 
that could be rotated in 3-d [and I just might!],.. 

Some of the changes that I'd make in this lo-res version would 
simply make it more compact. 

For example: lines 2630 through 271 can be written in just one 
line: 

2630 ON S GOSUB 2500. 2360, 2200, 2070, 1910, 1750, 
1610, 1440. 1270: RETURN 

A more extensive, but space-saving, change would be to get rid of 
all the HLINing and VLINing and turn them all into a single FOR-NEXT 
loop that uses integer arrays contains the x,y coordinates of all the 
PLOTS that are used to create the number or letters. Example: 

10 FDR A = 1 to NUMBER %[0]: PLOT X%[A].Y%[A]: NEXT A: 
RETURN 

1 1 REM NUMBER%[0] HOLD THE NUMBER OF ELEMENTS IN 
EACH ARRAY, X%[ ] AND Y%[ ] ARE THE X,Y LOCATION THAT 
MUST BE PLOTTED 

All the PLOTting of numbers would be done by this single taop 
subroutine after the X % , Y % , and Number % arrays had been filled with 
the proper data. 

I would change most of the INPUT statements into GET 
statements so thet the RETURN key would not have to be hit so often, 

I would also remove all of the redundancies in the graphics 
routines. And, of course, I would add in a little intelligence so that one 
could play against the computer. 

All in all, looking back, Amber's T's isn't such a simple program 
after all. In fact, I'm starting to feel rather proud of this, my first 'real' 
program. 



10 REM ** flMBER'5 TIC TftC TOE ** 

20 REM ** CREATED DECEMBER 3, 1980 ** 
30 TEXT : HOME 
40 DIM NAME2*<75>» ANAME*(75) 
70 DIM £5<9) 

8* DIM LA<3>, LB<3), LC<3>, LX(3) 
90 DIM RA<3), RB<3>, RC(3>» RX(3) 
100 VTfiB 18: PRINT "TIC T A C 

T E" 
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IWTIBEFYb 

Ts 

hau. r. 
fteigfM 




110 

126 

140 

158 
166 
176 

186 

196 
266 

216 
226 
236 
246 
256 
266 
276 
286 
296 
366 
316 
326 
336 
346 
356 
366 
376 
386 



VTAB 28: PRINT "PRESENTED BY UNCLE 
BEV." 

VTAB 18: PRINT "PLEASE TYPE YOUR 
NAME WHEN I ASK FOR IT." 
INPUT "WHO IS 'X'"3 NAHE1*: 
INPUT "WHO IS '0*"; ANAME* 
"THANK-YOU" 
8 « 19! C » 31 



"AMBER" ) 



13: 



PRINT 

A - 7: 

GR 

IF ( LEFT* <NAME1$,5) = "AMBER") 

OR < LEFT* <ANAME*,5> 

THEN GOSUB 4396 

FOR YELLOW » 6 TO 39: COLOR= 

HLIN 6,39 AT YELLOW: NEXT YELLOW 

REM **** ZERO DIM. VARIABLES ***** 

FOR TEST » 6 TO 9: SS(TEST) = 6: 

NEXT TEST 

GOSUB 4266 

TIC = 6 

REM ***************************** 

REM ***** DRAW TIC TAC TOE ****** 

COLOR= 1 

GOSUB 686 

REM ***************************** 

REM ** NUMBER THE SOUARES ** 

COLOR= 12 

FOR S » 1 TO 9 

GOSUB 2626 

NEXT S: S = 1 

REM ***************************** 

VTAB 23: PRINT : PRINT : PRINT 

e = n rr = i 

REM ******* THE NEXT TURN ******* 
IF > 6 THEN GOTO 426 
IF < THEN GOTO 396 



396 

466 

416 
426 

436 

446 

456 
466 
476 

486 
496 
566 
516 
526 
536 
546 
556 
566 
576 
586 
596 
666 
616 
626 
636 
646 

650 



PRINT "IT IS NOW "; ANAME*; "*S 

TURN TO PLAY." 

INPUT "ON WHAT NUMBER SftUARE DO 

YOU WANT YOUR *0* DRAWN..."; S 

GOTO 446 

PRINT "I THINK THAT IT'S "J 

NAME1** "*S TURN TO PLAY." 

INPUT "UPON WHAT NUMBER SOUARE DO 

YOU WISH ME TO DRAW YOUR *X*. "I 

S: GOTO 446 

IF <S < 1) OR (S > 9) THEN GOTO 

786 

ST = l: REM ** is nunbwr- taken? ** 

IF S = SS(ST) THEN GOTO 866 

ST » ST + li IF ST > 9 THEN GOTO 

496 

GOTO 466 

IF > 6 THEN GOTO 536 

IF < 6 THEN GOTO 526 

STOP 

SIDE = 

SIDE « 

SS<RR) 

IF > 

IF < 



2« GOTO 546 

li GOTO 546 

- S: COLOR= 13: GOSUB 2626 

6 THEN GOTO 596 

6 THEN GOTO 586 
REM ***************************** 
COLOR* 6: GOSUB 886: GOTO 600 
COLOR* 9: GOSUB 1076: GOTO 600 
REM *** HAS ANYONE WON YET ****** 
IF RR > 4 THEN GOSUB 3550 
IF TIC < 6 THEN GOTO 166 
RR = RR + 1* = -0 
IF RR = 10 THEN GOSUB 4336: 
GOTO 166 
GOTO 360: REM ** next turn ** 
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AH81K 


s r'b; LISIING continued 






660 


REM ******* SUBROUTINES ******* 


1130 


VLIN Y - 3, Y - 2 AT X - 2 






1140 


VLIN Y- 3, Y-2 AT X+2 


670 


REM ***************************** 


1150 


VLIN Y + 3, Y + 2 AT X - 2 


680 


REM ** DRAM TIC TftC TOE ** 


1160 


VLIN Y + 3, Y + 2 AT X + 2 


690 


VLIN 0, 39 AT 


1170 


VLIN Y-4, Y-3ATX-3 


700 


VLIN 0, 39 AT 39 


1180 


VLIN Y-4, Y-3ATX+3 


71 


HLIN 0, 39 AT 


1190 


VLIN Y+4,Y+3ATX-3 


720 


HLIN 0, 39 AT 39 


12O0 


VLIN Y+4, Y+3ATX+3 


738 


HLIN 2, 37 AT 13 


1210 


PLOT X + 4, Y + 4 


740 


VLIN 2, 37 AT 25 


1220 


PLOT X + 4, Y - 4 


750 


HLIN 2, 37 AT 25 


1230 


PLOT X - 4« Y + 4 


760 


VLIN 2, 37 AT 13 


1240 


PLOT X - 4, Y - 4 


770 


RETURN 


1230 


GOSUB 3660 






1260 


RETURN 


780 


PRINT "CHOOSE A SINGLE NUMBER FROM 








1 TO 9 THAT IS NOT ALREADY TAKEN." 


1270 


REM ******** MAKE A "9" ******** 


790 


FOR PAUSE * TO 1000: NEXT PAUSE 


1280 


X ■ C: Y = C 


800 


IF > THEN GOTO 820 


1290 


RX (SIDE) * RX (SIDE) + 1 


810 


IF < THEN GOTO B40 


1300 


LC (SIDE) « LC (SIDE) + 1 


82& 


PRINT "IT'S STILL "I NAMEU? "*S 


1310 


RC (SIDE) = RC (SIDE) + 1 




TURN ..." 


1320 


GOSUB 3660 


830 


GOTO 430 


1330 


HLIN X - 2, X + 3 AT Y 


840 


PRINT "..."* ANAME*? *, IT»5 STILL 


1340 


HLIN X-2, X + 2 AT Y - 3 




YOUR TURN..." 


1350 


HLIN X-2, X+2ATY+3 


830 


FOR PAUSE = TO 600: NEXT PAUSE! 


1360 


HLIN X- 3, X-2 AT Y-2 




GOTO 400 


1370 


HLIN X-3, X-2ATY-1 


860 


PRINT "THAT SQUARE IS TAKEN ..."« 


1380 


HLIN X-3»X-2ATY+2 




PRINT "CHOOSE ANOTHER SOUARE..." 


1390 


HLIN X+2 4 X+3ATY-2 


870 


FOR PAUSE * TO 1000: NEXT PAUSE: 


1400 


HLIN X + 2, X + 3 AT Y - .1 




GOTO 360 


1410 


HLIN X + 2, X+3ATY+1 






1420 


HLIN X + 2, X + 3ATY + 2 


880 


REM ******** MAKE AN "0" ******** 


1430 


RETURN 


890 


HLIN X-2, X+2ATY+4 






900 


HLIN X - 2, X + 2 AT Y - 4 






910 
920 
930 


VLIN Y-2, Y + 2 AT X - 4 
VLIN Y-2, Y+2ATX+4 
PLOT X - 3. Y - 3 


1440 
1450 
1460 


REM ******* MAKE AN "8" ******** 

X * B: Y = C 

LC (SIDE) m LC (SIDE) + 1 


940 


PLOT X - 2, Y - 3 


1470 


RB (SIDE) ■ RB (SIDE) + 1 


950 


PLOT X - 3, Y-2 


1480 


GOSUB 3660 


960 


PLOT X + 2, Y + 3 


1490 


HLIN X~2, X+2ATY-3 






1500 


HLIN X - 2, X + 2 AT Y 


970 


PLOT X + 3, Y + 3 










1310 


HLIN X-2, X+2ATY+3 


980 


PLOT X + 3, Y + 2 


1520 


HLIN X- 3, X-2 AT Y-2 


990 


PLOT X - 3, Y + 2 


1530 


HLIN X-3, X-2ATY-1 


1000 


PLOT X - %, Y + 3 






1010 


PLOT X - 2, Y + 3 


1540 
1550 


HLIN X-3, X-2ATY+1 
HLIN X-3, X-2ATY+2 


1020 


PLOT X + 2. Y - 3 








" 


1560 


HLIN X+2, X+3ATY-2 


1030 


PLOT X + 3, Y - 3 










1570 


HLIN X+2, X+3ATY-1 


1040 


PLOT X + 3, Y - 2 










1580 


HLIN X+2, X+3ATY+1 


1050 
1060 


GOSUB 3660 
RETURN 


1590 
1600 


HLIN X+2,X+3ATY+2 
RETURN 


1070 


REM ******* MAKE AN "X" ******** 










1610 


REM *««*««*« MAKE A "7" ******** 


1080 


VLIN Y - 1, Y + 1 AT X 


1620 


X = ft: Y = C 


1090 


VLIN Y - 2, Y - 1 AT X - i 


1630 


LX (SIDE) - LX (SIDE) + 1 


1100 


VLIN Y-2, Y-tATX+1 


1640 


LC (SIDE) «= LC (SIDE) + 1 


1110 


VLIN Y+1«Y+2ATX-1 


1650 


Rft (SIDE) * RA (SIDE) * 1 


1120 


VLIN Y+1,Y+2ATX+1 


1660 


GOSUB 3660 
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1679 


HLIN X - 3, 


X 


t 3 ftT y - 3 


1688 


HLIN X + 2, 


X 


+ 3 AT Y - 2 


1699 


HLIN X + 1, 


X 


+ 2 AT Y - 1 


it'99 


HLIN X, X + 


1 


AT Y 


1719 


HLIN X - l t 


X 


AT Y + 1 


1728 


HLIN X - 2, 


X 


- 1 AT Y + 2 


1739 


HLIN X - 2, 


X 


- 1 AT Y + 3 


1749 


RETURN 






1759 


REM ******** 


HAKE A "6" ******** 


176ft 


X = C! Y = B 




1779 


LB (SIDE) « 


LE 


(SIDE) + 1 


1780 


RC (SIDE) = 


RC 


, (SIDE) + 1 


1799 


G05UB 3669 






1809 


HLIN X - 2, 


X 


+ 2 AT Y - 3 


1819 


HLIN X - 3, 


X 


+ 2 AT Y 


1829 


HLIN X - 2, 


X 


+ 2 AT Y + 3 


183d 


HLIN X - 3, 


X 


- 2 AT Y - 2 


1846 


HLIN X - 3, 


X 


- 2 AT Y - 1 


1853 


HLIN X - 3, 


X 


- 2 AT Y + 1 


I860 


HLIN X - 3, 


X 


~ 2 AT Y + 2 


1876 


HLIN X + 2, 


X 


+ 3 AT Y - 2 


188« 


HLIN X + 2, 


X 


+ 3 AT Y + 1 


189ft 


HLIN X + 2, 


X 


+ 3 AT Y + 2 


1999 


RETURN 






1919 


REM ******** 


HAKE A "5" ******** 


1929 


X = B! Y « 


3 




1930 


RB CSIDE> = 


RB (SIDE) + 1 


1948 


RX (SIDE) = 


R> 


[ (SIDE) + 1 


1959 


LB (SIDE) = 


LB (SIDE) + 1 


1969 


LX (5IDE) = 


L> 


; (SIDE) + 1 


1976 


GOSUB 3669 






1989 


HLIN X - 3, 


X 


+ 2 AT Y - 3 


1999 


HLIN X - 3, 


X 


+ 2 AT Y 


2999 


HLIN X - 2, 


X 


+ 2 AT Y + 3 


2919 


HLIN X - 3, 


X 


- 2 AT Y - 2 


2929 


HLIN X - 3, 


X 


- 2 AT Y - 1 


2930 


HLIN X - 3, 


X 


- 2 AT Y + 2 


2940 


HLIN X + 2, 


X 


+ 3 AT Y + 1 


2959 


HLIN X + 2, 


X 


+ 3 AT Y + 2 


2969 


RETURN 






2979 


REM ******** 


HAKE A "4" ******** 


2989 


X = A* Y = 


B 




2099 


LB (SIDE) = 


LB (SIDE) + 1 


2190 


Rfl (SIDE) = 


Rfi (SIDE) + 1 


2119 


GOSUB 3669 






2120 


YLIN Y - 3, 


Y 


+ 3 AT X * 2 


2139 


VLIN Y - 3, 


Y 


+ 3 AT X + 1 


2149 


HLIN X ~ 3, 


X 


+ 3 AT Y ♦ 2 


2159 


HLIN X - 3, 


X 


- 2 AT Y + 1 


2169 


HLIN X - 2, 


X 


- 1 AT Y 


2179 


HLIN X - 1, 


X 


AT Y - 1 


2189 


PLOT X, Y - 


2 




2199 


RETURN 
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continued from page 39 
[Editors note. ■ ■ . 



Disk-O-Doc is not a nibble copier because it can 
not distinguish between sync bytes and normal bytes.] 

While on the subject of copy programs, 1 want to 
say that even though I agree totally with the censor- 
ship editorial by Bev. fi. Haight, I think that any 
publication has the right to refuse whatever ads they 
see fit, and for whatever reasons they tfay have. 

It would be interesting to know why Locksmith 
cancelled the ad in your magazine. 

[Editor's answer: Not having seen the magazine, 
and a fter having seen some of our junk-mail flyers, 
Mr. Alpert felt that our publication was a pirate 



newsletter that endorsed all forms of software theft. 
It was a common misconception among software vendors. ] 

Because we do not agree with someone else is no 
reason to become unglued. I also think that now that 
nibble copy programs have become available, the pro- 
gram and disk "protection" problem will die a natural 
death. Did you know that even Locksmith has been un- 
locked. The best way to "protect" a program from 
tampering (but not from copying) is to have it in ma- 
chine code. How many people can, or will, take one a- 
part to see how it works? 

The utility RUTS program, OiskEdit, is really 
neat and works beautifully. The example of how to use 
it was a big help in getting started. A printing rou- 
tine to print out what is on the screen, or the whole 
track at once for that matter, would be helpful in an 
alyzing all that stuff. Now if it would read and 
write nibbles — 

Please pass on to "Bobby" that in Applesoft, it 
is pointless to do a check using LEF[$(X$,l) after 
GETting X$. There is only one character to do some- 
thing with anyway. See line 5 in the program on page 
16 and line 40 in the program on page 29. Line 1682 
of the program fragment on page 18 shows how to check 
the value of a numerick input and line 60210 of the 
same fragment shows how to check an alphabetic input. 

[Editor's note... Bobby says that he suspects a 
bug in the GET routi ne. Sometimes, when you get a cha - 
ract er, the program GETs a wrong one, or acts as if i t 
got two cha racters instead of one. It can be solved 
by clearing the strobe before GETting consecutive cha- 
racters or by using LEFT$(X$, 1) . ] 

Sincerely, 

John W. Davison 

Ft. Walton Beach, FL 

Sirs, 

Now that I've seen your first issue, I realize 
how much trouble the "software selling mags" must have 
given you. You sure tell it like it is. Congratula- 
tions. 

Some time ago, in a weak moment, I subscribed to 

continued on pa &e £7 
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AMBU 1 


s f"'a£i LISTING continued from pjgt ^b 






2200 


REM ******** HAKE ft "3" ******** 


2/30 


REM **************************** 


221^ 


X = C: Y = fl 






2220 


LX (SIDE) s LX (SIDE) + 1 


2740 


REM ***** RIGHT SLASH WINS ***** 






2750 


TIC - TIC - 2 


2230 


Lft (SIDE) = LA (SIDE) + 1 


2760 


GOSUB 3930: REM ** STARS ** 


2240 


RC (SIDE) * RC (SIDE) + 1 


2770 


FOR WINNER i TO 3 


2250 


GO SUB 3660 


2780 


GOSUB 3660 


2260 


HLIN X - 2, X + 2 AT Y - 3 


2790 


X = A: Y = A: GOSUB 4OO0 


2270 


HLIN X - 2, X + 2 AT Y + 3 


280O 


X = Bi Y = B: GOSUB 4000 


22 80 


HLIN X - 1, X + 2 AT Y 


2610 


X ~ d Y = C: GOSUB 4000 


2290 


HLIN X - 3, X - 2 AT Y - 2 


2820 


NEXT WINNER 


2300 


HLIN X - 3, X - 2 AT Y + 2 


2830 


RETURN 


23 19 


HLIN X + 2, X + 3 AT Y - 2 






2320 


HLIN X + 2, X + 3 AT Y + 1 


2840 


REM ***** LEFT SLASH WINS ****** 


2330 


HLINX+2, X+3ATY+2 


2850 


TIC = TIC - 2 


2340 


HLIN X + 2, X + 3 AT Y - 1 


2860 


GOSUB 3930 


2350 


RETURN 


2870 


FOR WINNER - O TO 3 






2860 


GOSUB 3660 


2368 


REM ******** MAKE A "2" ******** 


2890 


X = C: Y = A! GOSUB 4O0O 


2370 


X = 8= Y = A 


2900 


X = Bi Y « Bi GOSUB 4000 


2380 


LA (SIDE) * LA (SIDE) + 1 


2910 


X = A: Y * Ca GOSUB 4000 


2390 


RB (SIDE) ■ RB (SIDE) + 1 


2920 


NEXT WINNER 


2400 


GOSUB 3660 


2930 


RETURN 


2410 


HLIN X - 2, X + 2 AT Y - 3 






2420 


HLIN X - 3, X+3ATY+3 


2940 


REM **** LEFT COLUMN WINS ****** 


2430 


HLIN X - 3, X - 2 AT Y - 2 


2950 


TIC « TIC - 2 


2440 


HLIN X + 2, X + 3 AT Y - 2 


2960 


GOSUB 3930 


2450 


HLIN X+2, X+3ATY-1 


2970 


FOR WINNER * TO 3 


2460 


HUN X, X + 2 AT Y 


2980 


GOSUB 3660 


2476 


HLIN X - 2, X AT Y + 1 


2990 


X = Ai Y - A: GOSUB 4000 


2480 


HLIN X - 3, X - 2 AT Y + 2 


3000 


X * A: Y * B: GOSUB 4OO0 


2490 


RETURN 


3010 


X = A! Y - Ci GOSUB 4000 






3020 


NEXT WINNER 


2500 


REM ******** MAKE A "1" ******** 


3030 


GOSUB 3730 


2510 


X = A: Y = A 


304O 


RETURN 


2520 


LA (SIDE) = LA (SIDE) + 1 






2530 


RA (SIDE) a RA (SIDE) + 1 


3050 


REM **** CENTER COLUMN WINS **** 


2540 


RX (SIDE) = RX (SIDE) * 1 


3060 


TIC » TIC - 2 


2550 


GOSUB 366.0 


3070 


GOSUB 3930 


2560 


YL1N Y - 3, Y + 3 AT X 


3080 


FOR WINNER ■ TO 5 


2570 


VLIN Y - 3, Y + 3 AT X + 1 


30 90 


GOSUB 3660 


2580 


HLIN X ~ 1, X+2ATY+3 


3100 


X = 8: Y ~ A= GOSUB 4000 


2590 


PLOT X - 1, Y - 2 


3110 


X = B= Y » Bi GOSUB 4OO0 


2600 


RETURN 


3120 


X * Bi Y - C= GOSUB 4000 






3130 


NEXT WINNER 


2610 


REM **************************** 


3140 


RETURN 


2620 


REM ** DETERMINE SQUARE ** 






2630 


IF 5 = 1 THEN GOSUB 2500 


3150 


REM ***** RIGHT COLUMN WINS **** 


2640 


IF 5 = 2 THEN GOSUB 2360 


3160 


TIC ■ TIC - 2 


2650 


IF S = 3 THEN GOSUB 2200 


3170 


GOSUB 3930 


2660 


IF S = 4 THEN GOSUB 2070 


3180 


FOR WINNER = TO 3 


2670 


IF 5=5 THEN GOSUB 1910 


3190 


GOSUB 3660 


2680 


IF S = 6 THEN GOSUB 1750 


3200 


X » C= Y = A: GOSUB 4000 


2690 


IF S * 7 THEN GOSUB 1610 


3210 


X = Ci Y = B( GOSUB 4000 


27'00 


IF S - 8 THEN GOSUB 1440 


3220 


X = Ci Y = C: GOSUB 4000 


2710 


IF S = 9 THEN GOSUB 1270 


3230 


NEXT WINNER 


2720 


RETURN 


3240 


RETURN 
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3250 


REM ****** TOP ROW WINS ******** 


3269 


TIC n TIC - 2 


3278 


GOSUB 3930 


3280 


FOR WINNER = TO 3 


3290 


GOSUB 3660 


3300 


X = fts Y = ft! GOSUB 4000 


3313 


X = Bi Y = ft! GOSUB 4000 


3326 


X = Ct Y = ft! GOSUB 4000 


333v 


NEXT WINNER 


3340 


RETURN 


3350 


REM ***** MIDBLE ROW WINS ****** 


3360 


TIC = TIC - 2 


3370 


GOSUB 3930 


3380 


FOR WINNER = TO 3 


3390 


GOSUB 3660 


3400 


X * Ai V » BE GOSUB 4000 


3410 


X = Bi Y - Bs GOSUB 4000 


3420 


X = Ci Y = Bi GOSUB 4000 


3430 


NEXT WINNER 


3440 


RETURN 


3450 


REM ***** BOTTOM ROW WINS ****** 


3460 


TIC * TIC - 2 


3470 


GOSUB 3930 


3480 


FOR WINNER U TO 3 


3490 


GOSUB 3660 


3300 


X * fl= Y * Cs GOSUB 4000 


3510 


X ~ B! Y * C= GOSUB 4000 


3520 


X = C: Y ■ C: GOSUB 4000 


3530 


NEXT WINNER 


3540 


RETURN 


3550 


REH **** WHO IS THE WINNER? **** 


3560 


IF RX<SIBE) ■ 3 THEM GOSUB 2740 


3570 


IF LX(SIBE) ■ 3 THEN GOSUB 2840 


3580 


IF LA(SIBE) * 3 THEN GOSUB 3250 


3590 


IF LBCSIDE) - 3 THEN GOSUB 3350 


3600 


IF LC(SIBE) = 3 THEN GOSUB 3450 


3610 


IF RA(SIBE) * 3 THEN GOSUB 294© 


3620 


IF RB(SIB£> » 3 THEN GOSUB 3050 


3630 


IF RCCSIBE) * 3 THEN GOSUB 3150 


3640 


IF TIC < THEN GOTO 3730 


3660 


REM ** NOISE MAKER ** 


3670 


P - - 16336 


3680 


FOR NOISE * TO 10 


3690 


H * PEEK CP) - PEEK iP) + PEEK 




<P> - PEEK CP) 


3700 


NEXT NOISE 


3710 


RETURN 


3720 


REM ***************************** 


3730 


REM * CONGRATULATIONS TO WINNER * 


3740 


IF > THEN GOTO 3760 


3750 


IF < THEN GOTO 3810 
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continued from page 55 

C.C., and you are right, it's just a software adver- 
tisement cover to cover. 

Also, I was aware that Dave Alpert was getting a 
bad time, but I didn't realize it was that bad. I 
would like to congratulate Allen Emery for having the 
courage to advertise in HARDCORE, as well as the other- 
few advertisers you have. All Apple people should 
support these advertisers as much as possible... 

Thanks, 

Allen Chaikin 

Fallbrook, CA 

Dear Editor, 

Received your Premeir issue of HARDCORE . Holy Di- 
gital! It is explicit and down-right hard-core. It is 
like watching topless and bottomless for the first 
time. I have keyed in the Akalabeth and Walla! If 
works. 1 love it. 1 love it! 

Keep up your good work. 1 would like to see in 
the future an article on "how to" cram all the short 
commercial games on one diskette. 

Brothers, there will be hardship on your part for 
your underground work. But keep it up. 

Thank~you for your kind fore-play. 
P.S. Why not include all programs listings of 
a single issue on one diskette for all those who hate 
to type and do "digital manipulation"? 

sincerely, 
(name withheld by request) 

Dear HardCore, 

Even with the presence of bit-copiers, the need 
for a magazine like yours is tremendous since the re- 
sulting copy disk is still "protected". I find it 
very annoying that 1 must first boot the BASICS disk 
to run protected 3.2 disks on DOS 3.3. Any articles 
that will allow one to transfer files from protected 
3.2 disks onto normal DOS 3.3 disks will be greatly 
appreciated. The article "boot 3.2 Diskettes on 3.3" 
which appeared in Nibble helps, but it doesn't work on 
some of the protected 3.2 disks. 

I purchased Locksmith version 3.0 in order to 
back up my library. It worked on 8 out of 10 protect- 
ed disks. Overall, I am quite happy with the Lock- 
smith although I find that the documentation leaves 
something to be desired. Nowhere does it state in the 
documentation that it supports synchronized or unsyn- 
chronized tracks. Perhaps you could explain these 
terms in a future issue so that the users can under- 
stand the difference between them. 

Which version of Locksmith did you test in your 
review? In any review, it would be helpful to indi- 
cate the version number and then have follow-up re- 
con tin ued on page bB... 
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AMBER'S 



1 i 

T's: LISTING continued from page 5/ 

i i 



3760 REM ********£** x HINS ********* 

3770 HTAB 5s PRINT "CONGRATULATIONS ! " 

3780 PRINT "IT LOOKS LIKE «1 NAME!*! 

" WINS THIS GAME." 

3790 FOR PAUSE - TO 1000= NEXT PAUSE 

3800 GOTO 3850 

3810 REM *********** WINS ********* 

3820 PRINT "YOU WON /'J ANAME*; "!": 

PRINT "YOU BEAT "; NAMEH; " !" 

3830 GOTO 38b» 

3840 FOR PAUSE ■ TO 1000= NEXT PAUSE 

3850 REM ***** ANOTHER GAME ??? ***** 

3860 PRINT "HOW ABOUT ANOTHER GAME?" 

3870 INPUT "IF YOU DO, THEN TYPE O"? 

AGAIN 

3888 IF AGAIN - THEN GOTO 160 

3890 PRINT "WELL, SO LONG, THEN." 

3900 TEXT s HOME : PRINT "THE END" 

3910 END 

3920 REM **************************** 

3930 REM ** STARS ** 

3940 PRINT :PRINT 

mm FOR STAR ■ 1 TO 40: PRINT "*"?: 

NEXT STAR 

3980 RETURN 

3990 REM **************************** 

4000 REM *** DISPLAY WINNING ROWS ** 
4310 IF > THEN GOTO 4030 
4020 IF < THEN GOTO 4070 



4030 REM ****** FLASH THE 

4040 COLOR" 15: GOSUB 1070 

4050 COLOR= O: GOSUB 1070 

4060 GOTO 4110 



>X* ****** 



ftimtn iiPUF 



c ontinued from page 57 

views as new versions become available. 

In your review of Locksmith, you state that it 
takes 5 to 6 minutes to copy a disk. With a single 
drive system, it takes about 30 minutes!! Perhaps 
you could indicate copy times for users with only a 
single disk drive. 

Best of luck in your "Crusade" and I will be 
looking forward to trying out some of the methods you 
suggest and to receiving future issues. 

Sincerely yours, 

Richard Sylvester 

Belgium 



4070 
4080 
4O90 

4100 

4110 

4190 

4200 
4210 
4220 
4230 
4240 
4258 
4260 
4270 
4280 
4290 
4300 
4310 

4320 
4330 
4340 



4350 
4360 



4370 
4380 



>0' ******* 



REM ***** FLASH THE 
COLOR= 15: GOSUB 880 
C0LOR= 0: GOSUB 880 
GOTO 4110 
RETURN 



REM **************************** 

** 



REM ** 
FOR SIDE « 
RX(SIDE) * 
RA(SIDE) * 
RB(SIDE) = 
RC(SIDE> • 
LX(SIUE) = 
LA<SIDE) " 
LB(SIDE) = 
LC(SIDE) = 
NEXT SIDE 
RETURN 



ZERO VARIABLES 
1 TO 2 











RE.M **************************** 

REH ******* NO ONE WON ********* 

PRINT "IT LOOKS LIKE NO ONE WON 

THIS GAME...": PRINT "SO LEPS 

TRY ANOTHER GAME" 

FOR PAUSE = 10 3000: NEXT PAUSE 

PRINT "AND THIS TIME,"! NAMEUl 

" AND "; ANAMEf! ", TRY A LITTLE 

HARDER ! " 

FOR PAUSE = TO 2000: NEXT PAUSE 

RETURN 



4390 REM ******* HELLO AMBER ******** 
4400 PRINT "HELLO AMBER" 
4410 RETURN 



Sir: 

Your new magazine was shown to me, and I was ask- 
ed my opinion about the inside back cover. I realize 
there is the problem of unauthorized copying, but 1 do 
not want programs that I cannnot back up. And I'm not 
too enthusiastic about programs that I cannot modify t 
my own tastes. When I write programs for other people 
I write in FP Basic, so that they can modify them. I 
have a couple of programs that I purchased that did 
not suit my purposes and it is not practical to modif 
them, so I just do not use them (money wasted.) 

Sincerely, 

Harry ft. Moneyhun 

Anderson, IN 
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ARE YOU 

A 

HARDCORE 

WRITER 



HARDCORE COMPUTING is looking for hard-core com- 
putensts to write columns, articles or programs. 

COLUMNS 

IF you have an idea for a column and would like to become a 
HARDCORE columnist or feature writer, then drop the Publisher a 
note. Please include a sample of your proposed column and a letter 
briefly introducing yourself, your background, your interests and exper- 
tise. If you haven't written before, don't let that stop you from dropping 
us a letter. 

PROGRAMS 

If you have an original program and would like to share it with 
other HARDCORE readers then send us a cassette or diskette with the 
entire debugged program and the accompanying external documenta- 
tion or an article describing what it is and how it does what it does. We 
pay from 520 to S 1 00 to print the article and listing in HARDCORE. 

Some readers would rather buy the tape or diskette instead of typing it 
all in themselves, so we offer you TWO means of selling your software: 

1 . Do your own mail-order. The listing and the article wil act as 
advertising, and those interested in purchasing the program can send 
their bucks to you directly. It's a great way to start your own software 
business. 

2. Join the HARDCORE Program Library. We offer the program 
on diskette along with any others in the HARDCORE Program Library, 
We charge our readers for the diskette, postage and handling, and then 
offer each program at what we call the Direct Royalty Charge (DRC) of 
$ 1 to $5, depending upon demand. The DRC is what you receive for 
each program of yours that we sell through the HARDCORE Program 
Library. You would receive a quarterly royalty check (the amount is an- 
nounced in the magazine). Our readers would then be able to get many 
programs on the same diskette. It is less expensive for the readers and 
less work for the writer. 

Our diskettes are not copy -protected, so your programs are 
bound to be bartered. One advantage of this method is the potential of 
program improvement through reader input. The improvements are 
then included in the updated versions. Copy -protection would slow or 
halt such program evolution. 

ARTICLES 

What is a HARDCORE article? 

It is a no-frills how-to step-by-step trip through some aspect of 
Apple-dom. 



We work closely with our writers and we generally pay from S20 
to $ 1 00 for articles, columns or programs. The bigger bucks go to the 
authors of in-depth, HARDCORE articles full of apple-aids and useful, 
well-written programs. The lesser bucks go to writers who submit hints, 
small programs or articles that have less HARDCORE content. 

Why not become a HARDCORE writer? 

All it takes is a touch of genius, and a no-nonsense hard- 
core determination to find out everything you can about your Ap- 
ple .. . plus an honest willingness to share that hard-won 
knowledge with others in this Apple Free Press magazine. 



IBRA 




exchange subscriptions 

There were at least 4 other periodicals that 
were left out of the last LIBRARIAN list: 



Dt Dobb's Journal 

For users of snail computer systems 

a monthly magazine by People's Computer Com- 
pany, Box E, 1263 £1 Camino Real, Menlo Park, 
CA 94025. 

$21 per year {U.S.), more elsewhere 



Peelings II 



The magazine of Apple Software Evaluation 

6 times a year by Peelings II, Inc., 2260 
Oleander, Las Cruces, NH 88001 

$15 per year (U.S.), more elsewhere 



Computerist's Directory 

The Who's Who of People and Computers 

published seni-anually (Jan, July) with up- 
dates by Alternet, Inc., P.O. Box 405, For- 
estville, CA 95436. 

$10 per year (see ad on page 30) 



Computer Shopper 

The Nationwide Marketplace for Computer 
Equipment 

a monthly by Patch Publishing Company, Inc., 
P.O. Box F, Titusville, FL 32780. 

$10 per year (U.S., more elsewhere) 



If we still left you out of our Library, 
just send us a recent issue of your periodi- 
cal and begin an exchange subscription with 
us. Join our library of reference litera- 
ture. 
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Diskedit version 2.1 is listed hBre for those of you who like to type. The program has undergone 
some r-ather extensive changes. The speed has been optimized and this version is compilable. The com- 
mands have been expanded end changed. Default values are used extensively. The commands are listed 
below and are in the following format; 
KEY [MNEMONIC) MODE PROMPT M „ ■ . ■ i. n .., n n. ■■ ■ ■ '' 



]Dish 



ESC [ESCAPE)-- 

This is the "1 changed my mind" key. Press this key to reset 
defaults and exit back to the command mode. 

RTN (RETURN)-- 

The RETURN key when used to answer an input prompt, will set 
the current default and continue. [Example: when prompted for the 
track and sector during a reed command, pressing RETURN twice will 
cause the current track and sector to be read.) 

A [ASCII) COMMAND 

Sets the [ASC] screen format and prints the buffer contents on 
the screen-display as all ASCII characters. Control characters are 
shown as periods. [See "Z" filter command] 

C (CATALOG) CATALOG 

Calls the catalog from the disk using the default slot and drive. 



□ [DRIVE) SET-DRIVE 

Prompts you for a new drive number. 
[Default drive value at BOOT is 1 .] 



Valid entries are 1 or 2. 



E [EDIT] EDIT 

A continuous-edit mode, this mode allows you to type in changes 
just like a typewriter. If you are in [ASC] format then all keys are valid 
except the ESC key. In [HEX] format only valid hex digits are accepted 
as input. Press the ESC key to exit this mode. 

F [FORMAT) COMMAND 

Steps the EDIT format from normal to flashing to inverse and back 
to normal in a continuous cycle each time you press the 'F' key. [Exam- 
ple: in normal mode, press the 'F' key to change mode to flashing. 
Press the 'F' key again to get inverse and again to go back to normal.] 
The [ASC] prompt will reflect the format that you're in. It is only visible 
in [ASC] screen format]. 



P [PRINT] PRINTER 

Dumps the buffer contents to your printer. The format is 1 6 HEX 
bytes and 1 6 ASCII characters. A header is printed first which shows 
the track, sector and volume. This routine supports the SilenType 
printer, if you use another printer you wi* need to alter this routine, 
[see Making Changes] 

R [READ] COMMAND 

Prompts you for Track and Sector to read [The ESC key resets 
defaults end exits while the RETURN key sets defaults end continues] 

S [SLOT] SET-SLOT 

Prompts you for new slot. (Default slot at BOOT is 6] 

U (UPDATE) COMMAND 

Hips input/output mode between hex and decimal updates the 
display information. Onty the track, sector and pointer are affected by 
this key. [Default at BOOT is Hex] 

W [WRITE] WRITE 

Prompts you for Track and Sector to write to [The ESC key sets 
defaults and exits while the RETURN key sets defaults and continues]. 
After entering the Track and Sector, DiskEdit wi beep three times and 
pause This is your chance to change your mind. Press RETURN to 
WHITE or any other key to escape. 

X (EXIT) COMMAND 

Clears screen and exits to BASIC. 

Z [FILTER] COMMAND 

Switches the filter on and off each time you press the "Z" key. The 
fitter changes inverse, flashing end lower case characters on the 
screen display to normal ASCII. Control characters are displayed as in- 
verse. Entering the EDIT mode automatically switches the filter off. 
(Default at BOOT is on] 



G [BELL] COMMAND 

Turns the sound on and off each time you press the "G" key. 
[Defaults at BOOT is ON] 

H (HEX) COMMAND 

Writes the buffer contents to the screen as all HEX characters. 
This is useful for editing binary files. 

I (UP] COMMAND ^ ^ t\H 

Moves cursor up, ^jf*-** 

J [LEFT] COMMAND 

Moves cursor left. 



K [RIGHT] COMMAND 

Moves cursor right. 

M (DOWN) COMMAND 

Moves cursor down. 

L (LAST) COMMAND 

Reads last sector. 

N (NEXT) COMMAND 

Reads next sector. 

O (CURSOR) CURSOR 

Allows cursor to be jumped to any absolute position in the displayed 
sector. 



8 
10 



TEXT : HOME : LOMEM : 8194 : GOSUB 
272 : GOSUB 134 J GOTO 160 
HTAB (HTX - 1> * 3 + 1 : VTAB VT* + 
2 : RETURN 

6 GOSUB 4 : PRINT " "; : VT* * INT 

(KYX / 13) : HTX * KYX - <VTX * 13) 
+ 1 : GOSUB 134 : GOTO 70 
PRINT MID» (At.KYX ♦ 1,1); : RETURN 
GET N$ : KYX = ASC (N«> +128 : 
GOTO 16 

12 GOSUB 4 

14 KYX = PEEK t- 16384) : IF KYX < 128 
THEN INVERSE : PRINT M >" CHR* <8> ; 
: GOSUB 42 : NORMAL : PRINT " M 
CHR* <8>; : GOSUB 42 : INVERSE : 
PRINT ">" CHR* (8); : GOSUB 42 : 
NORMAL : PRINT " " CHR* (8); ! GOTO 
14 

16 POKE -16368,0 : IF KYX < > 155 THEN 
RETURN 

18 POKE FLX.FTX : TKX • TOX : SEX = 
SOX : GOSUB 134 : GOSUB 144 : GOSUB 
142 ; POKE CMX.RDX 
■ 
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I 




, 3 ; &>M 



Edit S.J 



aa 





48 




50 




52 




54 




56 




58 

60 

62 




64 
66 




68 




70 


' k 


72 
74 



20 CALL - 10621 : GOTO 160 

22 GOSUB 12 : IF NOT FX* THEN 34 

24 IF KY* < 160 THEN 34 

26 IF KY* < 192 THEN KY* = KY* + 32 : 

GOTO 30 
28 KY* ■ KY* - 32 
30 IF FX* « 1 THEN KY* « KY* - 96 : 

GOTO 34 
32 KY* » KY* - 160 
34 POKE 7936 + PT* P KY* : GOSUB 4 : 

PRINT " "; : POKE NM*,KY* : CALL 

HH* : GOTO 60 
36 GOSUB 4 : PRINT "> "; : GOSUB 22 : 

VTA8 23 : HTAB 35 : IF IX* THEN 

PRINT PT*; : GOTO 36 
38 POKE NM*,PT* : CALL HX* : PRINT " " 

; : GOTO 36 
40 GOSUB 4 : GOSUB 84 : IF KY* > 15 

THEN PRINT G*; : GOTO 40 
42 RETURN 
44 GOSUB 40 : Al* * KY* : PRINT " "; : 

GOSUB 8 : GOSUB 40 : A2* * KY* : 

GOSUB 100 : GOTO 34 
46 GOSUB 4 : PRINT "> "; : GOSUB 44 : 

VTAB 23 : HTAB 35 : IF IX* THEN 

PRINT PT*; : GOTO 46 

POKE NM*,PT* : CALL HX* : PRINT " • 

; : GOTO 46 

GOSUB 4 : PRINT " " : KY* = KY* - 8 

: ON KY* GOTO 52,56,60,160,66 

VT* = VT* - 1 : IF VT* < THEN VT* 

= 19 : GOTO 68 

GOTO 70 

HT* « HT* - 1 : IF HT* < 1 THEN HT* 

= 13 : GOTO 52 

GOTO 70 

HT* * HT* + 1 : IF HT* > 13 THEN 

HT* » 1 : GOTO 66 

IF VT* a 19 AND HT* > 9 THEN HT* = 

1 : GOTO 66 

GOTO 70 

VT* =» VT* + 1 : IF VT* > 19 THEN 

VT* * 

IF VT* = 19 AND HT* > 9 THEN HT* 

= 9 

GOSUB 4 : PRINT ">" 

13 + HT* - 1 : RETURN 

PRINT G$G$; : RETURN 

KY* = PEEK (- 16384) : 

THEN 74 
76 POKE - 16368,0 : RETURN 



PT* * VT* • 



IF KY* < 128 



80 

82 

84 
86 
88 
90 

92 



94 
96 

98 
100 

102 
104 



106 
108 
110 



112 
114 

116 
118 






78 ERR ■ PEEK (ER*> : ffOKE 34,1 : POKE 
35,21 : HOME : VTABJ12 : HTAB 12 : 
IF ERR = 16 THENjPr|nT 
"UNABLE TO WRITET (. 
IF ERR < > 16 THEN PRINT 
"DISK DRIVE ERROR" J 
GOSUB 72 : FOR X = 1 TO 2000 : NEXT 
: POKE 756,0 : POKE 35,24 : GOTO 18 
IF NS* THEN GOSUB 10 : GOTO 88 
GOSUB 14 



120 

122 

124 
126 



128 







GOSUB 84 : 
GOTO 



130 



IF KY* - 141 THEN RETURN 

KY* =» KY* - 176 : IF KY* < OR KY* 

> 22 THEN GOSUB 72 : GOTO 84 

IF KY* > 9 THEN KY* = KY* - 7 : IF 

KY* < 10 OR KY* > 15 THEN GOSUB 72 

: GOTO 84 

IF ED* THEN RETURN 

IF IX* AND KY* > 9 THEN GOSUB 72 : 

GOTO 84 

RETURN 

IF ED* OR NOT IX* THEN KY* = Al* 

16 + A2* : RETURN 

KY* * Al* * 10 * A2* : RETURN 

NS* * 1 : VTAB 23 : HTAB 1 : FLASH 

: PRINT*"TRK"; : NORMAL : HTAB 5 : 

GOSUB 84 : IF KY* > 15 THEN KY* * 

TK* : GOTO 114 

IF NOT IX* AND KY* > 2 THEN 114 

IF KY* > 3 THEN 114 

Al* » KY* : GOSUB 8 

IF KY* > 15 THEN KY* = Al* 

114 

A2* - KY* : GOSUB 100 

IF KY* < OR KY* > 34 THEN PRINT 

Gt; : GOTO 104 

TO* = TK* : TK* « KY* : GOSUB 144 

NS* = 1 : VTAB 23 : HTAB 1 : 

INVERSE : PRINT "TRK" ; : HTAB 9 : 

FLASH : PRINT "SCT"; : NORMAL : 

HTAB 13 : GOSUB 84 : IF KY* > 15 

THEN KY* = SE* : GOTO 128 

IF NOT IX* THEN 128 

Al* = KY* : GOSUB 8 : IF KY* > 1 

THEN 128 

GOSUB 84 : IF KY* > 15 THEN KY* A 

Al* : GOTO 128 

A2* = KY* : GOSUB 100 : IF KY* < 

OR KY* > 15 THEN PRINT G$; : GOTO 

lie 

S<& « SE* : SE* = KY* : VTAB 23 : 
HTAB 9 : INVERSE : PRINT "SCT"; : 
NORMAL : GOSUB 144 : IF PEEK (CM*) 
« 2 THEN VTAB 24 : HTAB 30 : FLASH 
: PRINT "??WRITE??"G«G*G*; : 
NORMAL : GOSUB 74 : IF KY* < > 141 
THEN 18 

POKE SC*,SE* : POKE TR*,TK* 
140 






GOTO 
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186 



168 



i 



132 FOR X = 1 TO 40 : PRINT "-"; : 
NEXT : RETURN 

134 VTAB 23 : HTAB 1 : CALL - 958 : 

INVERSE : PRINT "TRK"; : HTAB 9 : 172 
PRINT "SCT"; : HTAB 17 : PRINT 174 
"VOL"; : HTAB 31 : PRINT "CRS" : , 176 
PRINT "SLOT"; : HTAB 9 : PRINT 
"DRIVE"; : HTAB 18 : PRINT "I/O"; 178 

136 VTAB 24 : HTAB 30 : FLASH : PRINT H * 180 
"COMMAND"; : NORMAL : PRINT " "; : 
RETURN . f 182 

138 GOSUB 144 <-184 

140 CALL 10* 

142 CALL MV* ! RETURN 

144 VTAB 23 : HTAB 5 : IF IX* THEN 
PRINT TK*" "; : HTAB 13 : PRINT 
SE*" "; : HTAB 21 : PRINT PEEK 
(V0*>" "; : HTAB 35 : PRINT 

-~ PTV <*; 
(lAQ IF NOT IX* THEN POKE NM*,TK* : 
**** CALL HX* ; HTAB 13 : POKE NM*,SEX 
.: £ALL HX* : HTAB 2J M :. WmsU-PSEK 
Ilikti^pVCPi); "HTAB"5 ''POKE NM*,PT* : 
CALL HX* : PRINT " "; 

148 HTAB 25 : IF HA* = 1 THEN PRINT 
"(HEX"; : GOTO 156 

150 IF FX* = THEN PRINT "<ASC"; : 
GOTO 156 

152 IF FX* = 1 THEN PRINT "<"; : FLASH 
: PRINT "ASC"; : GOTO 156 

154 IF FX* = 2 THEN PRINT "<"; : 
INVERSE : PRINT "ASC"; 

156 NORMAL : PRINT ")"; ! VTAB 24 : 

HTAB 6 : PRINT PEEK (SL*) / 16; : 
HTAB 15 : PRINT PEEK <DR*>; : HTAB 
22 : IF NOT IX* THEN PRINT "HEX"; 
: RETURN 

158 PRINT "DEC"; : RETURN 

160 POKE 216,0 : ED* = : NS* = : 
IN# : PR# : GOSUB 136 : IF 
PEEK (756) > THEN GOSUB 78 

162 TO* * TK* : SO* = SEX : GOSUB 144 

: GOSUB 12 : KY* * KY* - 192 : IF 206 

KY* > AND KY* < 27 THEN ON KY* 

GOSUB 166,72,264,170,168,176,184, 2 08 

180,50,50,50,220,50,226,234,188,72 
,248,250,72,182,72,256,258,72,270 210 

164 GOTO 160 

166 PRINT G$ : HA* = 2 : POKE FM*,HA* 212 
: GOTO 142 214 

168 VTAB 24 : HTAB 30 : FLASH : PRINT 
GS"»EDrr«"; : ED* » 1 I NORMAL : 
POKE FL*,0 : CALL MV* : ON HA* 216 
GOTO 46,36 218 

170 NS* = 1 : VTAB 24 : HTAB 30 : 220 

INVERSE : PRINT G$"SET DRIVE"; : 



» 






f 



90 
192 

194 
196 
198 
200 



202 
204 









HA* = 


1 


: 


POKE 


FM*,HA* 


IX* * 


NOT 


IX* 


RETURN 


IF G$ 


= 


CHRS (7) THEN 


RETURN 










THEN G» 


= 


CHR$ 


(7) : 



FLASH s PRINT 



HTAB 9 : FLASH : PRINT "DRIVE"; : 
NORMAL : HTAB 15 : GOSUB 84 : IF 
KY* > 15 THEN GOTO 134 
IF KY* < 1 OR KY* > 2 THEN 170 
POKE DR*,KY* : GOTO 134 
PRINT Gt : FX* = FX* + 1 : IF FX* 
> 2 THEN FX* = 
RETURN 
PRINT G$ 
: GOTO 14: 
PRINT G* 
PRINT G$ 
G* =< "" 
IF G* = 
RETURN 

VTAB 24 : HTAB 30 
G$"PRINTER"; : NORMAL : CALL 1002 
: VTAB 23 : HTAB 39 : PRINT : IF 
NOT PR THEN GOSUB 260 
IF NOT PR THEN PRINT G$G$G$; : 
RETURN 

LI* = 1 : Z* = 7936 : PRINT CHR$ 
(4>"PR#"PR ! PRINT "TRACK : "; : 
IF IX* THEN PRINT TK*; 
IF NOT IX* THEN POKE NM*,TK* : 
CALL HX* 

PRINT " SECTOR : "; : IF IX* THEN 
PRINT SE*; 

IF NOT IX* THEN POKE NM*,SE* : 
CALL HX* 

PRINT " VOLUME : " PEEK <V0*> : 
FOR X = 1 TO 16 * LI* : CT - 
(X - 1) * 16 / LI* : IF NOT IX* 
THEN POKE NM*,CT i CALL HX* 
IF IX* THEN PRINT CT; 
HTAB 5 : PRINT "-"; : HTAB 7 : FOR 
L = TO 15 / LI* : POKE NM*, PEEK 
(Z* + L) : CALL HX* : PRINT " " ; : 
NEXT L : PRINT " "; : FOR Y 
16 / LI* : CHAR = PEEK (Z*J 
CHAR < 32 THEN CHAR = CHAR + 
GOTO 214 

IF CHAR < 64 THEN CHAR * CHAR + 
128 : GOTO 214 

IF CHAR < 96 THEN CHAR = CHAR + 
128 : GOTO 214 

IF CHAR < 128 THEN CHAR = CHAR + 
64 : GOTO 214 

IF CHAR < 160 THEN CHAR * 174 
PRINT CHR$ (CHAR); : Z* = Z* + 1 : 
NEXT Y : PRINT : IF PEEK (- 16384 > 
=155 THEN 218 
NEXT X 

PRINT CHR* (4)"PR#0" : RETURN 
SE* * SE* - 1 : IF SE* > - 1 THEN 
POKE SCX.SE* : GOTO 138 



f 



1 TO 
IF 
192 : 
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. 










222 


SEX * 15 




TKX - 1 : 




TRX, TKX : 


224 


TKX = 34 


226 


SEX = SEX 



223 



230 



232 

234 



236 

238 

240 
242 

244 



246 
248 



250 



252 
254 
256 



258 
260 



262 
264 
266 



: POKE SCX, SEX : TKX = 
IF TKX > = THEN POKE 

GOTO 138 

: POKE TRX, TKX 
+ 1 : IF SEX < 
POKE SCX, SEX : GOTO 138 
SEX = : POKE SCX, SEX : 
+ 1 : IF TKX < 35 THEN POKE TRX 
TKX : GOTO 138 
TKX = TKX + 1 : IF TKX < 35 THEN 



GOTO 138 
16 THEN 

■>- 
■■'. 



TKX = TKX 






C. 

i 



i 



: INVERSE 

; NORMAL : 

GOTO 136 

: HTA8 30 



PRINT 



. 



IF 



. 



POKE TRX, TKX : GOTO 138 

TKX = : POKE TRX, TKX : GOTO 138, 

NSX = 1 : PRINT G$ : VTAB 24 : 

HTAB 30 : INVERSE : PRINT "CURSOR" 

; : NORMAL : PRINT " " ; : VTAB 23 

: HTAB 31 : FLASH : PRINT "CRS" ; : 

NORMAL ; HTAB 35 : GOSUB 84 : IF 

KYX > 15 THEN GOSUB 134 : GOTO 70 

A1X => KYX : GOSUB 8 : GOSUB 84 : 

IF KYX > 15 THEN KYX = A1X : GOTO 

A2X * KYX : GOSUB 8 : GOSUB 100 : 

IF NOT I XX THEN 6 

IF KYX > 25 THEN 6 

A1X = KYX : GOSUB 84 : IF KYX > 15 

THEN KYX = A1X : GOTO 6 

A2X ■= KYX : GOSUB 8 : GOSUB 100 : 

IF KYX < OR KYX > 255 THEN PRINT 

G* : GOTO 234 

GOTO 6 

VTAB 24 : HTAB 30 

PRINT G$">READ<"; 

" "; : GOSUB 104 

NSX = 1 : VTAB 24 

INVERSE : PRINT G$"SET SLOT" 

HTAB 1 : FLASH : PRINT "SLOT 

NORMAL : HTAB 6 : GOSUB 84 : 

KYX > 15 THEN GOTO 134 

IF KYX < 1 OR KYX > 7 THEN 250 

POKE SLX.KYX * 16 : GOTO 134 

POKE CMX.WRX : VTAB 24 : HTAB 30 : 

INVERSE : PRINT G$">WRIT£<"; : 

NORMAL : GOSUB 104 : POKE CMX.RDX 

: GOTO 134 

TEXT : HOME : CALL 1002 : END 

FOR XX = 1 TO 7 : AD = - 16384 + 

256 * XX : IF PEEK (AD + 23) = 201 

AND PEEK (AD + 55) = 207 AND PEEK 

(AD + 76) = 234 THEN PR = XX : XX 

ft 7 

NEXT XX : RETURN y 

CALL 1002 ! ONERR GOTO 268 

VTAB 24 : HTAB 30 : FLASH : PRINT 

"CATALOG"; : NORMAL : POKE 34,1 : 

POKE 35,21 : HOME : PRINT : PRINT 

CHR* (4)"CATAL0G,D" PEEK IDRX)",S" 

PEEK (SL*> / 16 : PRINT : POKE 35, 



274 



p 



276 



24 : PRINT 

"PRESS ANY KEY TO CONTINUE "j 

GOSUB 74 : GOTO 142 

268 POKE 216,0 : VTAB 12 : HTAB 12 : 
PRINT "DISK DRIVE ERROR"G*G«G* : 
FOR X * 1 TO 1000 : NEXT : POKE 35 
,24 : GOSUB 142 : GOTO 20 

270 PRINT G* : FTX = NOT FTX i POKE 
FLX.FTX : GOTO 142 

272 FOR X m 752 TO 974 : READ AX : 

POKE X.AX : NEXT : DATA 1,0,0,0,0, 

1,169,3,160,0,32,217,3,176,22,96, 

1,96,1,0,0,0,17,3,0,31,0,0,1,0,0, 

96,1,0,1,239,216,162,255,142,244, 

2,96,173,243,2,76,43,3,173,243,2, 

174,240,2,224,2,240,4 

DATA 32,218,253,96,32,237,253,96, 

169,1,133,37,32,34,252,169,0,133, 

36,141,242,2,169,13,141,241,2,162, 

1,32,74,249,174,242,2,189,0,31, 

174,240,2,224,2,240,9,32,218,253, 

32,74,249,76,181,3,172,245,2,192,0 

DATA 240,61,24,216,201,32,176,5, 

105,192,76,175,3,201,64,176,5,105, 

128,76,175,3,201,96,176,5,105,128, 

76,175,3,201,128,176,5,105,64,76, 

175,3,201,160,176,6,56,233,128,76, 

175,3,201,224,176,3,76,175,3,56, 

233 

278 DATA 32,76,175,3,201,128,48,6,201, 
160,16,2,169,174,32,237,253,32,74, 
249,238,242,2,240,8,206,241,2,208, 
140,76,65,3,32,156,252,230,37,32, 
34,252,169,22,133,34,96 

280 SLX = 769 : DRX « 770 : TRX * 772 
: SCX = 773 : CMX = 780 : ERX = 
781 : VOX = 782 : RDX - 1 : MR* * 
2 : IOX = 758 : MVX = 819 : FMX - 
752 : HAX - 1 : FXX » : TKX - 
: SEX » : HTX - 1 : VTX n : 
HXX =* 795 : IXX m : At = 
"0123456789ABCDEF" : HHX ■ 801 : 
NMX n 755 : G* * CHRS <7> : FLX - 
757 : FTX = 1 

282 GOSUB 132 : VTAB 8 : HTAB 10 : 

PRINT "COPYRIGHT 1981 (C) u : PRINT 

: HTAB 10 : PRINT 

"ALL RIGHTS RESERVED" :PRINT: HTAB 

10 : PRINT "HARDCORE COMPUTING" : 

PRINT ! HTAB 10 : PRINT 

"P.O. BOX 44549" : PRINT : HTAB 10 

; PRINT "TACOMA, NA 98444" : VTAB 

22 : GOSUB 132: PRINT "INSERT DISK 

- PRESS ANY KEY TO CONTINUE"; : 

GOSUB 74 : GOTO 140 



- 






■f 
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advertising indeH 

Computerist's Directory 30 

D.R. Jarvis Computing, Inc 1 

Omega Microware, Inc 15 

Sensible Software, Inc 1? 

Soft CTRL Systems 31 

Stellation Two 28 

Sympathetic Software lf 





programs for sale 



If you want the most recent version of a 
previously published program, or if yoj sim- 
ply do not have the time to type In a pro- 
gram's long listing, you may be able to 
purchase it from the HardCore Program Li- 
brary. 



the honor royalty system 



Our diskettes are not copy-'protected' and we encourage you to 
let other computcrists make copies of them. But please ask them 
to help compensate the authors. Just ask them to participate 
in our Honor Royalty System. 

Those who make copies of these programs are urged to send $1 
for each program copied to the program's author {address in the 
program listing) especially if they appreciated the program. 
Write to us for updated versions of those same programs, or watch 
the pages of HardCore computing for changes and additions. 



PROGRAM LIBRARY CATALOG 



code 

U-0018 

U-002 

A-001 

G-001 

G-002 

G-003 



program name 

DiskEdit 2.3 (updated) 
DiskView 1.0 (new) 
Artist's Easel (new) 
Amber's T's (new) 
Text Invaders 2.0 (new 



language documentation 



A-soft* 
A-soft* 
A-soft* 
A-soft 

A-soft 



Relief Mapper 1.0 (new) A-soft 



booklet $2 
booklet $1 
none yet 
none 
none 
none 



DRC 

$4 
$3 

$3 
$2 
$2 

$1 



Note: If, after you order, an updated version was received by the 
Library, you will be sent the most recent versions. 



HOW TO ORDER HARDCORE PROGRAMS 

1. See if it's available by checking the list 
of programs for sale. 

2. List the code and program names along side 
its actual cost (the DRC or Direct Royalty 
Charge which the authors receive). Documenta- 
tion is an extra charge if you desire it. 

3. Total the charges and then, 

4. Add in the cost of the disk, first class 
postage, and handling... which now is $6.00 
(due to the rise in postage). 

5. Total all of this, and add a note telling 
us whether you want 13 or 16 sector formats, 
and send the list along with a check for that 
total to: 

HardCore Program Library 
P.O. Box 44549 
Tacoma, WA 98444 
Be sure to include your address neatly printed 
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computing 



Subscription 

Rdt&s 



USA . , , $2©.o© 

Canada „ . . $28.50 

Mex M Central America . . . $32.50 

S. America . . . $37.50 

All others . * . $42.00 

Dealer Inquiries Invited 



Hardcore Computing 

Subscriptions 

14404 East "D" Street 

Tacoma, WA 08445 
U.S.A. 
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the most 

outspoken and controversial 

computer magazine in apple-dom 

■HflPBUBBPBI uiinifiLiiig 

P.O. Box 44549 

Tacoma, WA 98444 

(206) 531-5690 



step 

'far beyond the 
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